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R- 747 


SIRU UTILIZATION REPORT 
ABSTRACT 

This report presents a complete description of the additional analysis, 
development and evaluation provided for the SIRU system as identified in the require- 
ments for the SIRU Utilization program set forth in Amendment 7S of NASA/Johnson 
Space Center Contract NAS 9-8242. 

The SIRU configuration is a modular inertial subsystem with hardware and 
software features that achieve fault tolerant operational capabilities. The SIRU 
redundant hardware design is formulated about a six gyro and six accelerometer 
instrument module package. The modules are mounted in this package so that 
their measurement input axes form a unique symmetrical pattern that corresponds to 
the array of perpendiculars to the faces of a regular dodecahedron. This six 
axes array provides redundant independent sensing and the symmetry enables the 
formulation of an optimal software redundant data processing structure with 
self-contained fault detection and isolation (FDI) capabilities. 

The SIRU Utilization program consisted of additional analytical and develop- 
mental effort in these four specific areas; 

1. Failure Detection, Isolation, Classification and Recompensation (FDICR). 

2. Error Source Propagation Characteristics. 

3. Single Position Self Calibration. 

4. Self Alignment System (Gyro Compassing). 

5. Local Level Navigation Performance Demonstrations. 

The theory, analysis, development description, software integration and 
performance evaluation of each of these advanced adjuncts comprised the SIRU 
Utilization program. 

This report consists of three volumes. 

Volume I, Theory, Development and Test Evaluations contains a complete 
description of the theory, analysis, implementation and test results for each 
of the tasks. 

Volume I also contains a review of the reliability performance statistics, 
possible future applications for the developed techniques and conclusions and 
recommendations. 
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Volume II, Software Documentation, provides documentation of the additional 
software and software modifications required to implement the Utilization capabilities 
including assembly listings and flowcharts. 

Volume III, contains the system-log of significant events from the beginning 
of the system testing program until it was completed in December, 1972. 

A companion to this report, SIRU Development Final Report R-746, has been 
issued documenting the design, development and evaluation of the basic SIRU system. 
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1. 0 Introduction 


This volume describes the software developed for the SIRU Utili- 
zation project. Two principal programs and their subroutines are documented, 
the single position calibration program and the End-to-End program which 
includes coarse and fine alignment, navigation and statistical failure detection, 
isolation, classification and recertification. 

Included in the documentation for each program and subroutine is 
a brief functional description, a listing, where necessary a flow chart, 
and the machine time and memory requirements. A load map is provided 
showing the location of each program as it resides in core for all but four 
programs. These four programs, SPUF, AA5F, VELF and MLPF, for 
reasons explained below, reside in the upper 8K of DDP516 core memory. 

The SIRU test facility DDP 516 computer has 16, 000 words of core 
memory. The upper 8, 000 words (8K) of memory are set aside for use 
by the utility programs including the loader program. Since the total memory 
requirement of the SIRU software plus overhead routines is approximately 
9580 words it was necessary to put some programs in the upper 8K of memory. 
This was accomplished by first loading the selected programs into the lower 
8K of memory from the disk operating system , transferring instruction by 
instruction into locations '20000 to '23560, modifying in memory access mode 
to change all address constants and saving as a run version called FXMR 
(fixed memory). These programs therefore do not show up on the load map. 

To call these subroutines, the main program uses a JST (jump store) in 
place of the normal CALL. 

1. 1 End to End Program 

The End-to-End program is described in the write up for its main 
program ALUP. In order to explain the timing and scheduling of tasks, the 
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End-to-End program is divided into three sections P, G and F (ref, 
write-up for ALUP). These sections also divide the End' to -End program 
functionally into the following tasks. 

Section Function Associated Program 

Page 

P 1. Read the six accelerometer RE50 93 

up- down pulse counters 


2. Compensate for accelerometer 
SF, bias and misalignment 

ACOM 

98 

3. Do bias recompensation 
(statistical) 

PDIS 

237 

2 

4. Normalize for Rw and 
Ru) effects 

ROMS 

263 

5. ■ Accumulate pulses for FDI 
(failure detection and isolation) 

PPUA 

189 

6 . Check for FDI 

ERCA 

249 

7. Do least squares matrix 
multipying 

MLPF 

45 

8 . Normalize quaternion 

SPUF 

12 

9. Perform the velocity algorithm 
transforming body AV to 
inertial AV 

VELF 

35 

10. Accumulate inettial AV 

VACU 

112 


2 



Section 


Function 


Associated Program 


G 1. Read the table angle encoder Part of Page 

ALUP 61 

2. Read the six gyro up- down 

counters and interpolators RE50 93 

3. Compensate for gyro SF GCOM 103 

BD, ADI A, ADOA, ADSRA, 

anisoelasticity, misalignments 

and OA coupling DCSO 234 

4. Do ramp recompensation COMP 209 

5. Do bias recompensation COMP 209 

6. Accumulate pulses for FDI GPUA 22 0 

and FDICR 

7. Do FDI ERCA 249 

8. Do least squares matrix multiply MLPF 45 

9. IfT> 260, do inertial rate VELF 35 

compensation 

10. If T = 60, do coarse alignment LVCA 230 

level calculation 

11. If 60 <T< 260 do coarse alignment SVFL 169 
£AV filter 

12. If T= 260, set E AV =0, set AZCA 223 

coarse alignment finish bit =1 

and do coarse alignment azimuth 
calculation 
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Section 


Function 


13. If 60 < T / 260 do attitude 
algorithm 

14. Update time counters part of 

ALUF 61 

F 1. Do fine alignment after coarse MAL6 203 

alignment is finished 

2. Do navigation (to enter navigation NVIG 174 

mode sense switch 2 on DDP516 
control panel must be set) 



3. If output bit is set (if time is STFL, 119 

multiple of 2 minutes) and register PDIS 237 

set 1 is restored (fine alignment or FNOP 75 

navigation update is finished) do the 
gyro and accelerometer statistical 
failure programs and start the output 
of system status 


Routines not specifically identified by task in sections P, G and F are 


FNOP 

Output routines 

FPOUTC 


15 

114 


STFL 

DTIS 

IDEN 

STVR 

DSQR 

SINX 


Statistical fail detection routines 
which operate every two minutes 

Square root Math 

sine/cos subroutines 


119 

160 

159 

191 

166 

199 


BTVR Fall insertion test routine 


272 
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1. 2 Single Position Calibration 


The single position calibration program runs in conjunction with 
the fine alignment program and functionally works as follows. For the first 
twenty minutes, only fine alignment is running at a rate of once per second. 

At twenty minutes the vertical axis filter (DZNC) starts and filters the one 
second intervals - ^XCMD^ ^ rom GDAC. Thirty minutes are allowed 

for the filter to settle out, at which point DZNC starts summing the filtered 
vertical axis drift while GDA C starts summing the six gyro Afl's. Twenty 
minutes later (80 minutes into the run) VCMF and LGDC perform the final 
calculation yielding estimated A, B, C and D gyro drifts (ADFT, BDFT, CDFT 
and DDFT) which are then printed out. 


The loaded version of the single position calibration program as 
shown on the load map utilizes eighteen of the subroutines documented in 
Volume III of the SIRU Development Final Report. Four additional programs 
were generated to accomplish the single position calibration function. These 
programs are 


Function Associated Program 


Controlling executive 

SPM2 

278 

Output subroutines 

SPCO 

287 

Fine Align program 

SPAL 

292 

Vertical axes drift filter, 
accumulator of vertical axis drift 
and gyro pulses 

PEP4 

298 
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1. 3 Memory and Timing 
1.3.1 End to End Program 

The following Table (1.1) lists each routine, its memory requirement, 
in octal and decimal, and the estimated machine time required for those 
programs and subroutines which are exercised during each update cycle (0. 02 
seconds for the End~to-End program running at 50 updates per second). 

Total memory requirements, including the Fortran Library (182) and 
the Base Sector (512) plus the total of 8546 shown in Table 1. 1 is 9240 words. 

The actual loaded End-to-End program utilizes the first 23560 locations in core 
(decimal 9776). 

The timing estimate of 8884 /vsecs is considered accurate to within 5%. 

The routines not timed in the table operate at update rates of once per 
second or once every two minutes and therefore are not critical in the evaluation 
of machine time requirements. For example, during Navigation (the computer's 
busiest mode) the additional untimed programs raise the percentage of computer 
time utilized from the 44.4% to a conservative 44, 7%. 

1. 3. 2 Single Position Calibration 


Table 1.2 lists each routine, its memory requirement, in octal and 
decimal, and the estimated machine time for each routine. The single position 
calibration program runs at 100 updates per second (i. e. .01 second per update 
cycle ). 


Total memory requirements including the Fortran Library (586) and 
the Base Sector (512) plus the total of 3731 shown in table 1.2 is 4829 words. 

The present demonstration program operating at 100 updates per second 
takes 70% of the machine time. A conservative estimate for the single position 
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calibration when integrated with the End-to-End program is 46% of the machine 
time. This will not alter the 44. 7% machine time required by the End-to-End 
program when operating in alternate modes. 
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TABLE 1.1 END-TO-END MEMORY AND TIMING 


BH 

MEMORY 

SOURCE 

TIMING 


OCTAL 

DECIMAL 

OR 

SUBROUTINE 

CYCLES 

/iSEC 

MLPF 

1560 

880 

PIPR 

631 

605. 8* 




GYPR 

661 

634. 6* 

VELF 

712 

458 

VELA 

979 

939. 8 




IRCO 

468 

449.3 

AA5F 

424 

276 


855 

820. 8 

SPUF 

257 

175 


488 

468. 5 

ERCA 

1222 

658 

PFDI 

1052 

1009. 9* 




GFDI 

1069 

1026. 2* 

ROM 5 

366 

246 


523 

502. 1 

BTVR 

203 

131 




SINX 

165 

117 




MAL6 

257 

175 




DSQR 

146 

98 




PPUA 

33 

27 


108 

103.4 

AZCA 

425 

277 




GPUA 

56 

46 


148 

142. 1 

LVCA 

147 

103 




SVFL 

151 

105 




DC50 

127 

87 


177 

169. 9 

PDIS 

774 

508 

PRBI 

59 

56. 6* 

ALUP 

777 

511 

(ACC'S) 

79 

75. 8 




(GYRO'S) 

149 

143. 0* 

FNOP 

1273 

699 




RE 50 

224 

148 

INPIP 

43 

41. 3 




IN GYRO 

105 

100. 8 

GCOM 

463 

307 


959 

920. 6 

ACOM 

201 

129 


426 

409. 0 

VACXJ 

50 

40 


97 

93. 1 

FPOUTC 

242 

162 




STFL 

1025 

533 




DTIS 

667 

439 




IDEN 

311 

201 




COMP 

465 

309 

GRMP 

119 

114. 2 




GRBI 

59 

56. 6* 

LNAV 

771 

505 




STVR 

304 

196 




TOTALS 

8546 


9254 

8884 


* 

indicates worst case 
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TABLE 1.2 SINGLE POSITION CALIBRATION 


MEMORY AND TIMING 



MEMORY 

TIMING 

SOURCE 

OCTAL 

DECIMAL 

CYCLES 

/vSEC 

SPM2 

604 

388 

228 

219 

SPCO 

217 

143 



SPAL 

362 

242 



PEP4/GDAC 

547 

359 

136 

131 

READ 

210 

136 

148 

142 

GCOM 

463 

307 

959 

, 921 

ACOM 

201 

129 

426 

409 

VACU 

50 

40 

97 

93 

SPUN 

257 

175 

488 

468 

AA6S 

424 

276 

855 

821 

VESP 

517 

335 

979 

940 

DCOA 

127 

87 

177 

170 

DCMT 

164 

116 

146 

140 

ERC’6 

104 

68 

191 

183 

EMIN 

42 

34 

16 

15 

GMIN 

42 

34 

16 

15 

GPMA 

524 

340 

920 

883 

SFPOUT 

242 

162 



SXOU 

63 

51 



SDGS 

145 

101 



MG63 

173 

123 

804 

.772 

MV 6 3 

125 

85 

■ 

740 

710 

TOTALS 

3731 

7326 

7032 


9 












END-TO-END PROGRAM LOAD MAP 


ATTACH TTSTAT 
OK 

DEBUG 

GO 

$Z 300 777 
$D 3 10 

000310 000000 

$4 

000311 000000 

$07630 

000312 000000 

$D 314 

000314 000000 

$4 

000315 000000 

$41210 

000316 000000 

©S 

LDRX 23665 1000 
GO 

m 

I BALUP 
MR 

C BFNOP 
MR 

C BRE50 
MR 

C BACON 
MR 

C 8GC0M 
MR 

C BVACU 
MR 

C BFPOUT 
MR 

C FTL16Y 
MR 

C BSTFL 

MR 

C 8DTIS 
MR 

C 8 1 DEN 
MR 

C BDSGlR 
MR 

C BSVFL 
MR 

C BNVIG 

I 


64 


1 


m 
C BPPlJA 
MR 

C BSTVR 
MR 

C BSINX 
MR 

C BMALS 
MR 

C UCOMP 
MR 

C BGPUA 
MR 


C BAZCA 
MR 

C BLVCA 
MR 

C BDC50 
MR 

C BPDlS 
MR 

C BERCA 
MR 

C bR0M5 
MR 

C BBTVR- 
LC 

M 

♦START 01000 
♦HIGH 17034 
♦NAMES 17151 
♦COMM 23777 
♦BASE 154 11 
♦BASE 16551 
♦BASE 01760 
♦BASE 0C272 
LIST 00001 
RUPT 01340 
MODE 01721 
OUTPUT 02000 
ICINIT 03274 
INPIP 03347 
INGYRO 03410 
ACOM 03522 
GCOM 03724 
VACU 04410 
FPOUTC 04462 
OUT 100 04674 
SQRTX 04726 

i 



? 


FSAT 

04 726 

AR (j$ 

05010 

T l CU 

0506 

TNOUA 

05 104 

TNOU 

05111 

TOOCT 

05161 

STFL 

05214 

DTIS 

06242 

ZEIN 

0S666 

ETA 

06716 

ZETA 

06732 

IDEN 

07132 

Ii)£*lV 

07325 

IDIN 

07345 

IPL2 

07420 

DSQR 

07444 

SVFL 

076 14 

S ] 

07752 

S2 

07754 

S3 

07756 

S4 

07760 

LNAV 

C 7766 

LAMS 

1C666 

OMGA 

10670 

H 

10672 

VR 

10700 

VN 

10702 

VE 

10704 

PP AC 

10770 

ST VR 

1 1024 

ZBTA 

1 1232 

cosx 

1 1332 

SI NX 

1 135 1 

FALN 

1 1520 

COf-iP 

12000 

CJ’II N 

12216 

Ci v ii Y iV 

12232 

3TRP 

12252 

B 

12326 

BP2 

12330 

PL CD 

12356 

PCP2 

12360 

GRBI 

12371 

GKrtP 

12436 

3PAC 

12466 

AZCA 

12546 

LVCA 

13174 

DCOA 

13344 

AOAP 

13452 


BOAR * 

13454 

COAP 

13456 

DOAP 

13460 

EOAP 

13462 

FOAP 

13464 

PSFI 

14000 

PKBI 

14740 ■ 

ROMS 

15000 

WXPR 

15333 

VYPR 

15334 

VZPR 

15335 

GFDI 

15450 

PFDI 

1 5544 

BdOT 

LC 

16630 

23777 

ATTACH 

OK 

OE'HRLE 

RES TOR 
OK 

FXttR 

ATTACH 

OK 

TTSTAT 

SAVE RALUP 64 
OK 


IOuO 


11 



PROGRAM NAME 
SOURCE: SPUF 
BINARY: BSPUF 

ENTRY POINTS (location): SPUN (’20500) 
GENERAL DESCRIPTION: 


This subroutine when called will correct the quaternion in order to 

maintain it as a unit quaternion. It imposes the constraint that 

. 2 2 2 2 , 

X +p + p + P “1. 
x y z 

Ideally the equations to be implemented would be 
X' = A d 



z 



d 

d 

d 


where 


d = 




*■ + p * + p„ + p. 


However, since the sum of the squares of the elements of the quaternion 
never deviates significantly from 1, we can simplify as follows: 

.2 x 2 , 2 , 2 , 

6 - X + p x + p y + p z ‘ 1 


or 


A + 


1 + e 





y 1 + e *“1 + -|- 



€_ 

2 


so 
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X' — X(1 -|-) 
p x ' = p x (1 •f ) 



Using the scaling and terminology for the quaternion described in the 
program AA5F 

P P ^2 

(i.e., L = ■!*, RX = RY = and RZ = — ) 

we derive the new constraint that 

L 2 + RX 2 + RY 2 + RZ 2 equal 1/4 

L' = L D 
RX 1 = RX D 
RY' = RY D 
RZ' = RZ D 

where 

D = - 
2 

E = L 2 + RX 2 + RY 2 + RZ 2 - •»- 
L 2 + RX 2 + RY 2 + RZ 2 = ~+ E 




L'= L (1-2E) 
RX' - RX (1-2E) 
RY' = RY (1-2E) 
RZ' = RZ (1-2E) 
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or 

AL = -2E L 
ARX = -2E RX 
ARY = -2E RY 
ARZ = -2E RZ 

Now expand the AL term (the ARX, ARY and ARZ terms are analogous). 
Since AL is very small we shall really calculate 

2 24 AL = -2 25 E L. 

9 ^ 

define FACT = -2 E. Then 


AL = 


FACT L 
.24 


since 


L = LI + 


L2 , L3 


2 16 2 3 ° 


then 


FACT LI , FACT L2 , FACT L3 
2 39 + a «” 


and we need only calculate 


AL = 


FACT LI 
.24 


repeating we have 


E = L 2 + RX 2 + RY 2 + RZ Z - 1/4 


and 


2 T .2 , L2 2 , L3 2 . LI L2 . LI L3 L2 L3 

L " L1 + 2 30 + 2 60 + 2 14 2 29 2 44 


RX = RX1 + 
RY 2 = . 

RZ 2 = . 


2 , RX2 2 , RX3 2 , RX1 RX2 . RX1 RX3 , RX2 RX3 


,30 


,60 


,14 


,29 


,44 
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substituting and gathering terms we get 


E = LI 2 + 

RX1 2 + 

RY1 2 + 

RZ1 2 

2 

, L2 + 

RX2 2 + 

RY2 2 + 

RZ2 2 L3 2 + RX3 2 + RY3 2 + RZ3 2 


2 30 


LI L2 + RX1 RX2 + RY1 RY2 + RZ1 RZ2_ 
2 14 

LI L3 + RX1 RX3 + RY1 RY3 + RZ1 RZ3 


L2 L3 + RX2 RX3 + RY2 KY3 + RZ2 RZ3 X 
2 44 4 


We now want to calculate 

25 

FACT = -2 E 

Since FACT has only 15 bits of significance, all terms contributing to E 
with denominators greater than 2 ^ can be ignored. This eliminates the 
te rm s 


L3‘ 


.60 


and 


L2 L3 » » ♦ 

^44 


The flow chart for the implementation on the DDP516 of the above 
derivation follows. 
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*TC"nrn*p tflecommun toatep data 



now- 

•516 ASSEMBLY 

LISTING 


non 1 




APS 


0002 




080 

*2051 

0002 




SUR® 

SPUN 

0004 

20500 

0 000000 

SPUN DAC 

+ * 

on 0 0 

20501 

0 02 

00461 

LDA 

L2 

no or 

2 0502 

000007 

DBL 


0007 

20503 

0 16 

00461 

MPY 

L2 

0004 

20504 

0401 

77 

IPS 

1 

ooco 

20505 

0 04 

20744 

PST 

OVFP 

O01 0 

20508 

0 02 

00462 

old 

L 3 

0011 

20507 

00020 1 

TAP 


0012 

20510 

0 07 

20754 

os n 

FU DO 

0013 

2051 1 

0 16 

00460 

MPY 

1.1 

on m 

70512 

0 0 6 

20744 

DAO 

ovrp 

om* 

2081 3 

0401 

76 

LRS 

2 

001 6 

70514 

0 04 

20742 

0ST 

supim 

0017 

20515 

0 02 

00464 

OLD 

PX1 

0018 

2 0*16 

000701 

TAB 


0010 

20517 

0 16 

00465 

«PY 

PX2 

0020 

20520 

0 401 

77 

I PS 

1 

002 1 

208?1 

0 04 

20744 

BST 

OVFP 

0027 

20522 

0 02 

00466 

DT.D 

PX 3 

0023 

70523 

000201 

I A3 


0024 

20524 

0 07 

20754 

OSB 

FODG 

0025 

20525 

0 16 

00464 

MPY 

P X 1 

002 8 

20528 

0 06 

20744 

DAD 

OV FP 

0027 

20527 

0401 

76 

LRS 

2 

on? Q 

70530 

0 06 

20742 

DAD 

SO MM 

0 0 24 

2053 1 

0 04 

20742 

PS? 

SO M M 

0030 

2053 2 

0 02 

00470 

OI.D 

RY 1 

0031 

20533 

000201 

I A D 


003 2 

20534 

0 16 

00 4 ** 1 

MPY 

py 2 

00 3 3 

20 535 

0 401 

77 

T R 3 

1 

0034 

20538 

0 04 

20744 

DST 

OVFP 

oo?s 

20537 

0 02 

00472 

OLD 

P Y 3 

00 3 8 

20540 

000201 

I A B 


0037 

20541 

0 07 

20754 

OSB 

PIJDG 

0033 

20542 

0 16 

00470 

!«PY 

RY 1 

0 0 30 

2054 3 

0 06 

20744 

DAD 

OVFP 

0040 

20544 

0401 

76 

I PS 

2 

0041 

20545 

0 06 

20742 

DAO 

SOM M 

0042 

70548 

0 04 

20742 

DST 

SUMM 

0043 

7054 7 

0 02 

00474 

DTD 

®Z1 

0044 

70550 

000701 

I A B 


00 4 8 

20551 

0 16 

00475 

MPY 

PZ2 

0048 

20552 

0401 

77 

LPS 

1 

0047 

20553 

0 04 

20744 

DST 

OVFP 

0043 

20554 

0 02 

00476 

DID 

PZ 3 

0040 

20558 

000201 

TAB 


0030 

20856 

0 07 

20754 

DSP 

FUOG 

00 31 

20557 

0 16 

00474 

MPY 

PZ1 

005? 

20560 

0 06 

20744 

DAD 

OVFP 

00 5 3 

2056 1 

0401 

76 

LRS 

2 

0054 

20562 

0 06 

20742 

DAO 

SUMS 

0053 

20563 

0401 

61 

LPS 

15 

0058 

20564 

0 04 

20742 

OST 

C JT M M 

00 57 

20565 

0 02 

00460 

DLO 

LI 
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HTCPOCOHP TFIECOHHUVTCATED DATA 



D9P- 

516 

ASSEMBLY 

LISTING 


OO^o 

20666 

0 

16 00461 

HPY 

L 2 

OOP" 

20567 

0 

04 20744 

D ST 

OVFP 

OOfin 

20670 

0 

02 00464 

OLD 

RX 1 

nofii 

20671 

0 

18 00465 

HPY 

PX2 

0062 

20^72 

0 

06 20744 

DAD 

OVFP 

006 3 

20673 

0 

04 20744 

D ST 

OVFP 

006 4 

20674 

0 

02 00470 

OLD 

P Y 1 

0066 

20676 

0 

16 00471 

HPY 

RY2 

0066 

20576 

0 

06 20744 

DAD 

OVFP 

0067 

20677 

0 

04 20744 

D ST 

OVFP 

0066 

20600 

0 

02 00474 

OLD 

FZ 1 

0069 

20601 

0 

16 00475 

HPY 

R72 

0070 

20602 

0 

06 20744 

DAD 

OVFP 

0071 

20603 

0401 76 

LBS 

2 

0072 

2 06 04 

0 

06 20742 

DAD 

SOHM 

0071 

20606 

0 

04 20742 

D ST 

STIHH 

00 74 

20606 

0411 76 

LLS 

3 

0076 

20607 

140040 

CPA 


0076 

20610 

0 

04 20752 

DST 

THRD 

0077 

206 11 

0 

02 20742 

DLD 

SOMH 

0 07.9 

20612 

0401 64 

LBS 

12 

0079 

20613 

0 

04 20742 

DST 

SDHH 

0080 

2 0^14 

0 

02 00460 

DLD 

LI 

0081 

20615 

0 

16 00460 

HP? 

LI 

0082 

2 0616 

0 

06 20742 

DAD 

SUHN 

0091 

20617 

0 

04 20742 

DST 

SUHH 

00 Q 4 

20620 

0 

02 00464 

DLD 

PX 1 

0036 

20621 

0 

16 00464 

HPY 

RXl 

0096 

20622 

0 

06 20742 

DAD 

ST! HN 

0087 

20623 

0 

04 20742 

D ST 

S( T HH 

0099 

2 0624 

0 

02 00470 

DLD 

PY 1 

0089 

20625 

0 

16 00470 

HPY 

PY1 

0090 

20626 

0 

06 20742 

DAD 

5UWM 

0091 

20627 

0 

04 20742 

D ST 

SDHH 

00 92 

20630 

0 

02 00474 

DLD 

RZ 1 

009 1 

2063 1 

0 

16 00474 

HPY 

BZ1 

00 q 4 

20632 

0 

06 20742 

DAD 

SDHH 

00 9 5 

20633 

0 

07 20750 

D SB 

TWNZ 

0096 

2 0634 

000201 

TAB 


0097 

20636 

140040 

CPA 


009R 

2 0636 

000 2.01 

IAB 


00°° 

20637 

0 

06 20752 

DAD 

TH PD 

0100 

20640 

0411 66 

LLS 

10 

0101 

20641 

0 

06 20756 

DAD 

HALF 

0102 

20*42 

140407 

TC A 


0103 

20643 

0 

04 20746 

DST 

FACT 

0104 

20644 

0 

16 00460 

HPY 

LI 

0105 

20645 

0 

06 20756 

DAD 

HALF 

0106 

20646 

000201 

IAB 


0107 

20647 

140040 

CPA 


0108 

20650 

000201 

IAB 


0109 

20651 

0401 67 

LRS 

9 

0110 

20652 

0 

06 00462 

DAD 

L3 

0111 

20653 

0 

04 20744 

DST 

OVFP 

0112 

20654 

140040 

CPA 


0111 

20655 

0 

04 00462 

DST 

L3 

0114 

20656 

0 

02 20744 

DLD 

OVFP 
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MTCROCOHP T ELECOMHUNTCAT BO DATA 



DDP- 

516 ASSEMBLY 

LISTING 


Oil* 

20667 

04 01 M 


IPS 

15 

Oil A 

20660 

0 06 00460 


DAD 

LI 

0 117 

20661 

0 04 00460 


DST 

LI 

0119 

20662 

0 02 00464 


DLD 

RX 1 

Oil* 

20663 

0 16 20746 


WPY 

FACT 

0120 

20664 

0 06 20756 


DAD 

HALF 

n 121 

20 66 6 

000201 


I AB 


0122 

20666 

140040 


CPA 


0123 

20667 

000201 


IAB 


0124 

20670 

0401 67 


LPS 

9 

0 1 2 r ' 

20671 

0 06 00466 


DAD 

RX3 

0120 

20672 

0 04 20744 


DST 

OVFP 

0127 

20673 

140040 


CPA 


012 9 

20674 

0 04 00466 


DST 

RX 3 

012* 

20676 

0 02 20744 


DLD 

OVFP 

0170 

20676 

0401 61 


LPS 

15 

om 

20 67 7 

0 06 00464 


DAD 

R X 1 

0132 

20700 

0 04 00464 


dst 

RX 1 

0 133 

20701 

0 02 00470 


DLD 

RY1 

0134 

20702 

0 16 20746 


PIPY 

FACT 

oils 

20703 

0 06 20756 


DAD 

HALF 

0176 

20704 

000201 


IAB 


0 137 

20706 

140040 


CPA 


0139 

20706 

000201 


TAB 


0 139 

20707 

0401 67 


IPS 

9 

0140 

20710 

0 06 00472 


DAD 

RY 3 

0 141 

20711 

0 04 20744 


DST 

OVFP 

014? 

20712 

140040 


CPA 


0 143 

2071 3 

0 04 00472 


DST 

PY3 

0144 

20714 

0 02 20744 


DLD 

OVFP 

0146 

20716 

0401 61 


LBS 

15 

0146 

70716 

0 06 00070 


DAD 

PY 1 

0 147 

20717 

0 04 00470 


DST 

PY1 

014 9 

20720 

0 02 00474 


DLD 

R21 

0149 

20721 

0 16 20746 


MPY 

FACT 

0160 

20722 

0 06 20756 


DAD 

HALF 

0 161 

207?3 

000201 


IAB 


016? 

20724 

140040 


CFA 


0 167 

20726 

000201 


IAB 


0164 

20726 

0401 67 


LPS 

9 

0 159 

20727 

0 06 00476 


DAD 

PZ3 

0166 

20730 

0 04 20744 


DST 

OVFP 

0167 

2073 1 

140040 


CPA 


015 9 

2073? 

0 04 00476 


DST 

RZ3 

0160 

20733 

0 02 20744 


DLD 

OVFP 

0160 

20734 

0401 61 


LPS 

15 

0 16 1 

20736 

0 06 00474 


DAD 

RZ1 

0162 

20736 

0 04 00474 


DST 

RZ 1 

0163 

20737 

000005 


SGL 


0164 

20740 

-0 01 20500 


JBP* 

SPON 

0166 

20742 

000000 

SOHM 

DBP 

0 


20743 

000000 




0166 

20744 

000000 

0 VFP 

DBP 

0 


20745 

000000 




0167 

20746 

000000 

FACT 

DBP 

0 


20747 

000000 




016P 

20760 

020000 

TNN2 

OCT 

20000 
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MTC^OCO’IP TELECOflEONICATED DATA 



r>T)P- 

516 ASSEMBLY 

LIST 

ING 


016^ 

20751 

20782 

oooooo 

oooooo 

T HP D 

DBP 

0 

0170 

20757 

20?54 

OOOOOO 

040000 

FTJDG 

OCT 

40000,0 

0171 

20755 

20756 

oooooo 

oooooo 

HALF 

OCT 

0, 40000 

0172 

20757 

040000 

000460 

LI 

EOU 

*460 

0177 


000461 

L2 

EQO 

Li ♦ 1 

0174 


000462 

L3 

son 

LI *-2 

017 5 


000464 

5X1 

EQO 

LI + 4 

0176 


000U65 

F72 

EOO 

L1 + 5 

017-7 


000466 

RX3 

Eon 

Ll + 6 

017« 


000470 

PY1 

EOO 

L 1 + 8 

0170 


000471 

RY2 

Eon 

1.1 + 9 

01 80 


000472 

BY 3 

EQO 

L1 + 10 

0181 


000474 

P71 

F0T1 

L1 + 12 

018? 


000475 

nz2 

eqo 

L 1 ♦ 1 3 

0187 


000476 

R7I3 

EOU 

Li + 1 4 

0184 




END 
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PROGRAM NAME 

SOURCE: AA5F 

BINARY: BAA5F 

RELATED MEMOS: T-493 

ENTRY POINTS (location): ATTA ('20000) 

GENERAL DESCRIPTION: 


This subroutine when called will perform a third order attitude 
algorithm to update the quaternion of rotation. The equation representing 
the algorithm can be expressed as: 


where 


p ' = ASa + Rp + S(p a - pa) 
K x x K x yz z y 

P y ’ = XSc * y + Kp y + S{p z a x ' p x^z ) 

P z ' = XS. z + R Pz + S(p z - y - P y - X } 

A’ = -S(p ■ a) + RA 



M = » • Of 
R = (1*jM) 

S = (1 - -jjrM) 


expanding this equation, if we define A = AO^AO^ + AO^AQ^ + AO^AO^ 


= xu - A>^+ a -4>p„ + (i -A-)! 12 


24' 2 


8' H x 


24' 


p Ad ~ p A 6 
1 ■" z r 2 y 


therefore: 


( P „ A0 '? * Po A0 J 


) 1 = p + 

x H x 


Xa6 x Xaa9 x a P x Py Ag z ~ p 2 Aa y a ^y~ v z fJ 2~ v y / 
2 48 " 8 + 2 ~ 48 


to determine p^', replace x, y, z subscripts by y, z, x in the equation for 

p To determine p replace x, y, z subscripts by z, x, y in the equation 
X z 
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for p^ } . Then, 


V = -S(p . a) + RX 


therefore: 


X' = X --g X - 


* (p A0 + p A0 + p Afl ) a 

A . XK x x K y y r z z . A 


+ -Tq(p A 0 + p A0 + p A 0 ) 

48 K x x K y y r z z 


In the present DDP516 implementation the actual numbers in the computer 
are scaled as follows: 

DX = 2 5 A 6 or A 9 = DX2‘ 5 

x x 

DY = 2 5 A0 y orA0 y = DY 2“ 5 

DZ = 2 5 A0 or AO = DZ 2* 5 
z z 


RX “ yorp x = 2RX 


p v 

RY = -^or p y = 2RY 


RZ = 2 orp z = 2RZ 


L “ yor X — 2 L 


D 2 = 2 10 A or A = D 2 2" 10 = (DX 2 + DY 2 + DZ 2 ) 2" 10 
now substituting this scaling into the equation given above we find: 


2RX' * 2RX + 


L DX L D 2 DX D 2 RX 
2 5 3 x 2 18 2 12 


RY DZ - RZ DY D 2 (RY DZ - RZ DY) 
2 5 3 X 2 18 


if we define 


ARX - RX’ - RX 


then. 
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ARX 


L DX 


L D* DX 


3x2 


19 


D 2 RX , RY DZ - RZ DY 

~P~~ 2 6 


n 2 (RY DZ - RZ DY) 


3x2 


19 


also. 


2 L' = 2L 


D 2 L RX DX + RY DY + RZ DZ 


12 


D 2 (RX DX + RY DY + RZ DZ) 


3x2 


18 


and if 

AL - L' - L, 

D 2 L RX DX + RY DY + RZ DZ , D 2 (RX DX + RY DY 4 RZ DZj 
" ' 2 13 ^ 3x2 19 

The equations for ARY and ARZ are obtained in a similar manner. 


A 16 bit word in the DDP516 is made up of a sign bit and 15 bits of 
fraction. For example, 0110 000 000 000 000 represents +.75 decimal. 
Each quaternion component is made up of three of these numbers, tor 
example, L will be represented by 


which is equivalent to a 45 bit signed fraction where the sign bits of L2 
and L3 are ignored. In core LI is in location '460, L2 in '461 and L3 + 
'40000* is in '463. Location '462 is normally zero except when '463 overflows 
into '462 which is then added to '461. RX, RY and RZ follow L in core in 
locations '464, '470 and ’474 respectively. A unit quaternion in core 

A= 1, /> x = 0, = 0, /> z = 0 


or 

L = 1/2, RX = 0, RY = 0, RZ = 0) 
would look like the following (in octal): 


*Since only Ll and L2 are used in the velocity algorithm, the '40000 (1 /2) 
added to L3 is for rounding. 
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loc. 

'460 

'461 

'462 

'463 

L 

040000 

000000 

000000 

040000 


LI 

L2 


L3+'40000 

loc. 

'464 

'465 

'466 

'467 

RX 

000000 

000000 

000000 

040000 


RX1 

RX2 


RX3+'4000Q 

loc. 

'470 

'471 

'472 

'473 

RY 

000000 

000000 

000000 

040000 


RY1 

RY2 


RY3+'40000 

loc. 

'474 < 

'475 

'476 

'477 

RZ 

000000 

000000 

000000 

040000 


RZ1 

RZ2 


RZ3+'40000 


2 

DX, DY and DZ are single precision fractions. However, D will be 30 
bits and will be represented by 


A 


With these considerations in mind the quaternion update equations can be 
expanded as: 


arx 


LI DX L2 DX L3 DX 
2 6 2 21 2 36 


DX D 2 1 LI DX D 2 ! L2 DX D 2 1 L3 


] 9 

„ 34 

49 

3X2 

3X2 

3X2 

DX D 2 2 LI 

DX D 2 2 

L2 DX D 2 2 L3 

34 

3 * 2 * 

3X2 49 

3X2 64 

D 2 1 RX1 

D 2 1 RX2 

D 2 1 RX3 

2 13 

2 28 

2 43 

D 2 2 RX1 

D 2 2 RX2 

D 2 2 RX3 

2 28 

2 43 

2 5B 

RY1 DZ 

RY2 DZ RY3 DZ 

2 6 

2 21 

2 36 

RZ1 DY 

RZ2 DY RZ3 DY 

to 

cn 

2 21 

2 36 


24 



D 2 1 RY1 DZ D 2 ! RY 2 DZ D 2 1 RY3 DZ 


3X2 


19 


3X2 


34 


3X2 


49 


D 2 1 RZ1 DY , D 2 1 RZ2 DY , D 2 1 RZ3 DY 

+ + + - |q 

3X2 3X2 3X2 


D 2 2 RY1 DZ D 2 2 RY2 DZ D 2 2 RY3 DZ 
3X2 34 3X2 49 3X2 64 


+ D 2 2 RZ1 DY , D 2 2 RZ2 DY , D 2 2 RZ3 DY 
3X2 34 3X2 49 3X2 64 


D 2 1 L3 D 2 2 LI D 2 2 L2 D 2 2 L3 
2 43 " 2 28 " 2 43 " 2 58 

RX3 DX RY 1 DY RY2 DY RY3 DY 

2 6 2 21 2 36 2 6 2 21 2 36 

RZ1 DZ RZ2 DZ RZ3 DZ 
2 6 ' 2 21 " 2 36 

D 2 1 RX1 DX , D 2 1 RX2 DX D 2 1 RX3 DX 
3X2 3X2 J * 3X2 

+ P 2 1 RY 1 DY f P 2 1 RY2 DY f P 2 1 RY3 DY 

3X2 19 3X2 34 3X2 49 

+ P 2 1 RZ1 DZ ) P 2 1 RZ2 DZ t P 2 1 RZ3 DZ 

3X2 19 3X2 34 3X2 49 

+ D 2 2 RX1 DX ] D 2 2 RX2 DX , D 2 2 RX3 DX 

3X2 34 3X2 49 3X2 64 

+ D 2 2 RY 1 DY | D 2 2 RY2 DY [ D 2 2 RY3 DY 

3X2 34 3X2 49 3X2 64 

+ D 2 2 RZl DZ ] D 2 2 RZ2 DZ | D 2 2 RZ3 DZ 

3X2 34 3X2 49 3X2 64 


D 2 1 LI D 2 1 L2 
2 1 3 " 2 28 

RX1 DX RX2 DX 


With ARY and ARZ defined in a similar manner. 
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The algorithm that is written considers L, RX, RY and RZ to have 

only 35 bits of significance. Therefore, all terms in the final equations 

35 

with denominators greater than 2 can be ignored. This simplifies the 
final equations to be programmed to: 


ARX = 


DX D^l LI 


2 r + 

2 21 

1 9 

3X2 

D 2 1 RXl 

D 2 1 RX2 

D 2 2 RXl 

2 13 

2 28 

tc 

t\D 

Co 

RY 1 DZ 

, RY2 DZ 

RZ1 DY 

_6 

,21 ' 

o 6 

2 

2 

2 

D 2 1 RY 1 

DZ , D 2 1 RZ1 DY 


,21 


3X2 


19 


3X2 J 


and. 


P 2 1 LI P 2 1 L2 D 2 2 LI 
2 13 2 2& " 2 28 

RX1 DX RX2 DX RY 1 DY RY2 DY RZ1 DZ RZ2 DZ 
2 6 2 21 2 6 2 21 2 6 2 21 

P 2 1 RX1 DX P 2 1 RY1 DY P 2 1 RZ1 DZ 

i ci + 19 + 19 

3X2 ia 3X2 3X2 


The final simplification is to replace 

(-2D 2 1 )/ 3 

with a variable called D3 and to calculate 2 8 ARX, 2 8 ARY, 2 8 ARZ and 2 8 
AL before deriving ARX, ARY, ARZ and AL. The program equations then 


are: 


2 6 ARX = LlDX + ^2- + DXD3Li 


15 


.14 


D 2 1 RX1 D 2 1 RX2 D 2 2 RX1 


.22 


.22 


+ RY 1 DZ + — - RZ 1 DY - RZ2 DY 


15 


15 


D3 RY 1 DZ D3 RZ1 DY 


14 


14 
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and. 


2 6 AL 


D 2 1 LI P 2 1 L2 D 2 2 LI 


,22 


,22 


RX1 DX - . RX 2. DX . Ryi DY _ KY2_DY__ RZJL DZ . RZ2 DZ 


.15 


15 


2 J-W 2 
D3 RX1 DX D3 RYI DY D3 KZ1 DZ 


,14 


,14 


,14 


.15 
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The Double Precision Accumulator 


RETURN 
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MTCROCOMP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0001 





ABS 


0002 





ORG 

*20000 

0001 





StJBR 

ATTA 

0004 

20000 

0 

000000 

ATTA DAC 

** 

0005 

20001 

0 

02 

00414 

LDA 

DX 

0006 

20002 

000007 

DBL 

• 

0001 

20003 

0 

16 

00414 

MPY 

DX 

0000 

20004 

0 

04 

20410 

dst 

D1 

0009 

20005 

0 

02 

00416 

DID 

DY 

0010 

20006 

0 

16 

00416 

MPY 

DY 

001 1 

20007 

0 

06 

20410 

DAD 

Dl 

0012 

20010 

0 

04 

2C410 

DST 

Dl 

0011 

20011 

0 

02 

00420 

OLD 

DZ 

0014 

20012 

0 

1b 

00420 

MPY 

DZ 

0015 

2001 1 

0 

06 

20410 

DAD 

Dl 

0016 

20014 

0 

04 

20410 

DST 

Dl 

0017 

20915 

0 

16 

20424 

MPY 

=« 125253 

0019 

20016 

0 

06 

20420 

DAD 

TEND 

0019 

20017 

0 

04 

20412 

DST 

D3 

00 20 

20020 

0 

0 2 

00416 

DLD 

DY 

0071 

20021 

0 

16 

00475 

MPY 

RZ2 

0022 

20^22 

0 

04 

20414 

DST 

Si 

0071 

20023 

0 

0? 

00420 

DLD 

DZ 

0024 

20024 

o 

16 

00471 

MPY 

RY2 

002 5 

20025 

0 

07 

20414 

DSB 

S 1 

0026 

20026 

0 

04 

20414 

DST 

Si 

0027 

20027 

0 

02 

00414 

DLD 

DX 

00 26 

20030 

0 

16 

00461 

MPY 

L2 

0079 

20031 

0 

06 

20414 

DAD 

Si 

0010 

20032 

0 

04 

20414 

DST 

Si 

0021 

20033 

0 

0 2 

00464 

DLD 

RX 1 

00 3 2 

20034 

0 

16 

20411 

MPY 

D2 

003 2 

20035 

0 

04 

20416 

DST 

S2 

00 3 4 

20036 

0 

0? 

20410 

DLD 

Dl 

0 03 5 

2 0 037 

0 

16 

00 46 5 

MPY 

PX 2 

00 

20040 

0 

06 

20416 

DAD 

S2 

0037 

70041 

04 0 1 

61 

LR5 

15 

00 39 

20042 

0 

04 

20416 

DST 

S2 

003° 

20043 

0 

02 

20410 

DLD 

Dl 

00»O 

20044 

0 

16 

00464 

MPY 

RXl 

004 1 

20045 

0 

06 

204 16 

DAD 

S 2 

0042 

20046 

0 

04 

20 416 

DST 

S2 

0043 

20047 

0 

02 

00416 

DLD 

DY 

00 4 4 

20050 

0 

16 

00474 

MPY 

BZ1 

0046 

20051 

0 

04 

20402 

DST 

DLRX 

004 6 

20052 

0 

02 

00420 

DLD 

DZ 

0047 

20053 

0 

16 

00470 

MPY 

RY 1 

00 4 P 

70054 

0 

07 

20402 

DSB 

DLRX 

0049 

20055 

0 

04 

20402 

DST 

DLRX 

0050 

20056 

0 

02 

00414 

DLD 

DX 

00 61 

20057 

0 

16 

00460 

MPY 

LI 

00 5? 

20060 

0 

06 

20402 

DAD 

DLRX 

0069 

20061 

0 

04 

20402 

DST 

DLRX 

0064 

20062 

0 

16 

20412 

MPY 

D3 

0055 

20063 

0411 

77 

LLS 

1 

0066 

20064 

0 

06 

20414 

DAD 

SI 

0067 

20065 

0401 

70 

IPS 

8 
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^TCROrnlP TELECOMMONICA? ED DATA 
DDP-516 ASSEMBLY LISTING 

DSB 
DAP 


S2 

SPND 


0Q6P 20066 
00 r ^ 20067 
00*0 20070 

0061 20071 

0062 20072 

0063 200"H 

0064 20074 
0066 20075 

0066 20076 

0067 20077 
006« 20100 
006ft 20101 

0070 20102 

0071 20103 

0072 20104 
0077 20105 
007H 20106 
007 r > 20107 

0076 20110 

0077 2011 1 
007P 20112 
007° 20113 
00 PO 20114 
OOP 1 20115 
OOP? 20116 
0003 ?0H7 
0 0ft 4 2 012 0 

0005 20121 

0006 20122 
0007 20123 
OOPft 20124 
OOftO 20125 

0090 20126 

0091 20127 

0092 20130 
00° 3 20131 

0094 20132 

0095 20133 

0096 20134 
0047 20135 
009ft 20136 
0094 20137 

0100 20140 

0101 20141 
010? 20142 

0103 20143 

0104 20144 

0105 20145 

0106 20146 

0107 20147 
0104 20150 

0109 20151 

0110 20152 
01^ 1 20153 

0112 20154 

0113 20155 

0114 20156 


0 07 20416 
0 06 20422 
0401 71 
0 06 20402 
0 04 20402 
0 02 00420 
0 16 00465 
0 04 20414 
0 02 00414 
0 16 00475 
0 07 20414 
0 04 20414 
0 02 00416 
0 16 00461 
0 06 20414 
0 04 20414 
0 02 00470 
0 16 20411 
0 04 20416 
0 02 20410 
0 16 00471 
0 06 20416 
0401 61 
0 04 20416 
0 02 20410 
0 16 00470 
0 06 20416 
0 04 20416 
0 02 00420 
0 16 00464 
0 04 20404 
0 02 00414 
0 16 00474 
0 07 20404 
0 04 20404 
0 02 00416 
0 16 00460 
0 06 20404 
0 04 20404 
0 16 20412 
0411 77 
0 06 20414 
0401 70 
0 07 20416 
0 06 20422 
0401 71 
0 06 20404 
0 04 20404 
0 02 00414 
0 16 00471 
0 04 20414 
0 02 00416 
0 16 00465 
0 07 20414 
0 04 20414 
0 02 00420 
0 16 00461 


IRS 

7 

DAD 

DLRX 

PST 

DLRX 

DLD 

DZ 

MPY 

FX2 

D ST 

SI 

DLD 

DX 

mpy 

RZ2 

DSB 

SI 

D ST 

SI 

DLD 

DY 

MPY 

L2 

PAD 

Si 

D ST 

Si 

DLP 

DY 1 

MPY 

D2 

DST 

5 2 

DLD 

D1 

MPY 

RY 2 

DAD 

S2 

LRS 

15 

DST 

S2 

DLP 

D 1 

MPY 

R Y 1 

DAD 

S2 

DST 

S2 

DLD 

DZ 

MPY 

RX1 

DST 

DLRY 

DLP 

DX 

MPY 

RZ 1 

DSB 

DLRY 

DST 

DLRY 

DLD 

DY 

MPY 

LI 

DAD 

DLRY 

DST 

DLRY 

MPY 

D3 

LLS 

1 

DAD 

SI 

LRS 

a 

DSB 

S2 

DAD 

SFND 

LP.S 

7 

DAD 

DLRY 

DST 

DLRY 

DLD 

DX 

MPY 

RY2 

DST 

SI 

DLD 

DY 

MPY 

RX2 

DSB 

SI 

DST 

SI 

DLD 

DZ 

MPY 

L2 
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MTCROCOMP TELECOMMUNICATED DATA 



^DP- 

516 

ASSEMBLY 

LISTING 


Oils 

20157 

0 

06 

20414 

DAD 

SI 

0115 

20160 

0 

04 

20414 

D ST 

SI 

0117 

20161 

0 

02 

00474 

DLD 

RZ 1 

0118 

20162 

0 

16 

20411 

MPY 

D2 

0110 

2016 3 

0 

04 

204 16 

DST 

S 2 

0120 

20164 

0 

02 

20410 

DLD 

Dl 

0121 

20165 

0 

16 

00475 

MPY 

RZ2 

0122 

20166 

0 

06 

20416 

DAD 

S2 

012 3 

20167 

0401 

61 

LRS 

15 

0 124 

20170 

0 

04 

20416 

DST 

S2 

012 5 

20171 

0 

02 

20410 

DLD 

Dl 

0125 

20172 

0 

16 

00474 

MPY 

R7.1 

012 7 

20173 

0 

06 

204 16 

DAD 

S 2 

0128 

20174 

0 

04 

20416 

DST 

S2 

012° 

20175 

0 

02 

00414 

DLD 

DX 

0130 

20176 

0 

16 

00470 

MPY 

RY1 

013 1 

20177 

0 

04 

20406 

DST 

DLRZ 

0133 

20200 

0 

02 

00416 

DLD 

DY 

0130 

20201 

0 

16 

00464 

MPY 

RX 1 

0134 

20702 

0 

07 

20406 

DSB 

DIP?. 

0175 

20203 

0 

04 

20406 

DST 

DLRZ 

0135 

20704 

0 

02 

00420 

DLD 

DZ 

0137 

30205 

0 

16 

00460 

MPY 

LI 

0133 

20206 

0 

06 

70406 

DAD 

DLRZ 

0130 

20207 

0 

04 

20406 

DST 

DLRZ 

0140 

20210 

c 

16 

20412 

MPY 

D3 

014 1 

20211 

0411 

*>7 

LLS 

1 

0147 

20212 

0 

06 

20414 

DAD 

Si 

0143 

20213 

0401 

70 

I. PS 

B 

0 144 

20214 

0 

07 

20416 

DSD 

S2 

0145 

20715 

0 

06 

20422 

DAD 

SFND 

0 145 

20216 

0401 

71 

LRS 

7 

01IP 

20217 

0 

06 

20406 

DAD 

DLRZ 

0 148 

20 2 20 

0 

0 4 

20406 

DST 

DLRZ 

014° 

20221 

0 

02 

00414 

DI.0 

DX 

0150 

20722 

0 

16 

00465 

MPY 

RX2 

0151 

20223 

0 

04 

20414 

DST 

SI 

0152 

70724 

0 

02 

00416 

DLD 

DY 

01*3 

20725 

0 

16 

00471 

MPY 

RY2 

0154 

20226 

0 

06 

20414 

DAD 

SI 

01*5 

20727 

0 

04 

204 14 

DST 

SI 

0155 

207 30 

0 

02 

00420 

DLD 

DZ 

015^ 

2 0231 

0 

16 

00475 

MPY 

RZ 2 

0158 

207 32 

0 

06 

20414 

DAD 

SI 

0159 

20233 

0 

04 

20414 

DST 

SI 

0150 

20234 

0 

02 

00460 

DLD 

LI 

0151 

20236 

0 

16 

20411 

MPY 

D2 

01*2 

20236 

0 

04 

20416 

DST 

S2 

0163 

70737 

0 

02 

204 10 

DLD 

Dl 

0164 

20240 

0 

16 

00461 

MPY 

L2 

0165 

20241 

0 

06 

20416 

DAD 

S 2 

0166 

20242 

0401 

61 

LP.S 

15 

01 6 7 

20243 

0 

04 

204 16 

DST 

S 2 

0168 

20244 

0 

02 

20410 

DLD 

Dl 

0169 

20245 

0 

16 

00460 

MPY 

LI 

0170 

20246 

0 

06 

20416 

DAD 

S2 

0171 

20247 

0 

04 

20416 

DST 

S2 
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MTCPOCOMP TELKCONMnNICAT ED DATA 
npp-516 ASSEMBLY LISTING 


017? 

20250 

0171 

20251 

0174 

20252 

017S 

20251 

0176 

20254 

0177 

20265 

017® 

20266 

0170 

20257 

0180 

20260 

0181 

20261 

01R? 

20262 

0181 

20263 

0 184 

20264 

0188 

2 076 5 

0 1 8 f 

20266 

0187 

2 0267 

0188 

20270 

018° 

70271 

0190 

20272 

0191 

20773 

0192 

20774 

0191 

20275 

0194 

20776 

019 5 

20277 

0196 

20700 

0197 

20701 

0198 

2010? 

019f» 

20307 

0209 

20104 

0201 

20.705 

0202 

20 906 

020’ 

20307 

0204 

20310 

0 2 06 

203 1 1 

0906 

2031? 

0 2 07 

20313 

0208 

20714 

0209 

203 15 

0210 

20 31 6 

021 1 

20717 

0212 

20 320 

0211 

20321 

021 4 

20322 

0 215 

20323 

0216 

20 724 

0217 

20325 

0218 

20 3 26 

021Q 

20327 

0220 

20330 

0221 

2 0 3 3 1 

0222 

20332 

0 221 

20133 

0224 

20 334 

0 22S 

20735 

022* 

20336 

0227 

20337 

0228 

20340 


0 02 00414 
0 16 00464 
0 04 20400 
0 02 00416 
0 16 00470 
0 06 20400 
0 04 20400 
0 02 00420 
140407 
0 16 00474 
0 07 20400 
0 04 20400 
0 16 20412 
0411 77 
0 07 20414 
0401 70 
0 07 20416 
0 06 20422 
0401 71 
0 06 20400 
0 04 20400 
140040 
000201 
0401 72 
140040 
0 06 00462 
0 04 00462 
000201 
140040 
0 06 00460 
0 04 00460 
0 02 20400 
0401 72 
0 06 00460 
0 04 00460 
0 02 20402 
140040 
000201 
0401 72 
140040 
0 06 00466 
0 04 00466 
000201 
140040 
0 06 00464 
0 04 00464 
0 02 20402 
0401 72 
0 06 00464 
0 04 00U64 
0 02 20404 
140040 
000201 
0401 72 
140040 
0 06 00472 
0 04 00472 


OLD 

DX 

riPY 

RX 1 

D ST 

DLL 

DLD 

DY 

HPY 

PY1 

DAD 

DLL 

DST 

DLL 

DLD 

DZ 

TCA 


HPY 

RZ1 

D SB 

DLL 

DST 

DLL 

HPY 

D3 

LLS 

1 

D SB 

SI 

LRS 

R 

D SB 

S2 

DAD 

SRND 

LRS 

7 

DAD 

DLL 

DST 

DLL 

CRA 


TAB 


LRS 

6 

CRA 


DAD 

L3 

DST 

L3 

TAB 


CRA 


DAD 

LI 

DST 

LI 

DLD 

DLL 

LRS 

6 

DAD 

LI 

DST 

LI 

DLD 

DLRX 

CRA 


IAB 


LRS 

6 

CRA 


DAD 

RX3 

DST 

PX 3 

TAB 


CRA 


DAD 

P XI 

DST 

RX 1 

DLD 

DLRX 

LRS 

6 

DAD 

RX1 

DST 

RX 1 

DLD 

DLRY 

CRA 


IAB 


LRS 

6 

CRA 


DAD 

RY 3 

DST 

RY3 
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MICROCOMP TELECOMMUNICATED DATA 



orp- 

516 ASSEMBLY 

LISTING 


0229 

20341 

000201 


IAB 


0230 

20342 

140040 


CRA 


0231 

20343 

0 06 00470 


DAD 

RY 1 

0232 

20344 

0 04 00470 


DST 

RY1 

02 3 3 

20345 

0 02 20404 


DID 

DLRY 

0234 

20346 

0401 72 


LRS 

6 

0235 

20347 

0 06 00470 


DAD 

RY 1 

0236 

20350 

0 04 00470 


DST 

BY1 

0237 

20351 

0 02 20406 


DID 

DLRZ 

0 238 

20352 

140040 


CBA 


0239 

20353 

000201 


IAB 


0240 

20354 

0401 72 


LBS 

6 

0241 

20365 

140040 


CRA 


0242 

20366 

0 06 00476 


DAD 

RZ3 

0243 

20357 

0 04 00476 


DST 

BZ 3 

0244 

20360 

000201 


IAB 


0246 

20361 

140040 


CBA 


0246 

20362 

0 06 00474 


DAD 

RZ1 

0247 

20363 

0 04 00474 


DST 

RZ 1 

0249 

20364 

0 02 20406 


DLD 

DLRZ 

0249 

20365 

0401 72 


LBS 

6 

0260 

20366 

0 06 00474 


DAD 

RZ1 

0261 

20367 

0 04 00474 


DST 

RZ 1 

0262 

20370 

000005 


SGL 


025 3 

20371 

140040 


CRA 


0264 

20372 

0 04 00462 


STA 

L3 

0256 

20373 

0 04 00466 


ST A 

RX 3 

0266 

20374 

0 04 00472 


STA 

RY3 

0257 

20375 

0 04 00476 


STA 

RZ 3 

0 2 58 

20376 

-0 01 20000 


JMP* 

ATTA 

0259 

20400 

000000 

DLL 

DBP 

0 


20401 

000000 




0260 

20 402 

000000 

DLRX 

D BP 

0 


20403 

000000 




0261 

20404 

000000 

DLRY 

DBP 

0 


20405 

000000 




0262 

20406 

oooooo 

DLRZ 

DBP 

0 


20407 

000000 




0263 

20410 

oooooo 

D 1 

OCT 

0 

0264 

20411 

oooooo 

D2 

OCT 

0 

0265 

20412 

oooooo 

D3 

DBP 

0 


20413 

oooooo 




0266 

20414 

oooooo 

SI 

DBP 

0 


20415 

oooooo 




0267 

20416 

oooooo 

S2 

DBP 

0 


20413 

oooooo 




0268 

20420 

oooooo 

TRND 

OCT 

0, 40000 


20421 

040000 




026° 

20422 

oooooo 

SEND 

OCT 

0, 100 


20423 

000100 




0270 


000414 

DX 

EQO 

•414 

0271 


000416 

DY 

EOU 

DX+2 

0272 


000420 

DZ 

EOU 

DX +4 

0273 


000460 

LI 

EO’J 

•460 

0274 


000461 

L2 

EOD 

L 1 ♦ 1 

0275 


000462 

L3 

eou 

LI 4-2 

0276 


000464 

RXl 

EQU 

L 1 *4 
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MTCROCOMP TELECOMKHN IC ATED DATA 


DPP-516 ASSEMBLY LISTING 


0377 

000465 

RX2 

Eon 

LI + 5 

027R 

000466 

RX3 

ecu 

LI +6 

027«» 

000470 

RY1 

equ 

LI + 9 

02 RO 

000471 

RY2 

eou 

LI +9 

02R1 

000472 

RY3 

EOO 

LI *10 

02R2 

000474 

RZl 

Eon 

LI 4-12 

02R3 

000475 

R22 

EOU 

11*13 

02 p a 

000476 

RZ3 

EOU 

L 1 + 1 4 

0?R5 20424 

125253 


END 
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PROGRAM NAME: 

SOURCE: VELF 
BINARY: BVELF 

ENTRY POINTS (LOCATION): VELA (’21000), IRCO ('21 522) 

GENERAL DESCRIPTION 

The subroutine VELA takes a quaternion (scaled at 2 ) creates 

2 . 

a cosine matrix from it (scaled at 2 ) and performs the matrix multiplication 
AVj = 2 Cg AVg. Since Cg = 4Fg (where F^ = (FXX, FXY. . . FZZ) the 
above equation can be rewritten as AVj = 8Fg AVg. 

The subroutine IRCO takes an inertial rotational command (A8j) 
which might be either calculated by the fine alignment program or the 
navigation program and modifies the body rotational command (A^g) as 
follows: 

I T - 

A8 B = aB b + f b aSj 

This is performed every update. In this 50 update per second 
system, A^g is scaled at 2 Fg at 2^ and AQj. at 50 x 2 
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HlCROCOMP telecommunicated data 
ddp-516 assembly listing 


nooi 

ono 2 

ooo? 


0 000000 
0 02 00465 


ABS 

ORO 

SUBR 

snap 

VELA DAC 
LDA 


0004 


onos 

21000 

000* 

21001 

0007 

21002 

0008 

21003 

0009 

21004 

0010 

21005 

non 

21006 

00 12 

21007 

0013 

21010 

0014 

21011 

oois 

21012 

0016 

21013 

0017 

21014 

0018 

21016 

0018 

21016 

0020 

21017 

0021 

21020 

0022 

21021 

0023 

21022 

0024 

2102? 

0026 

21024 

0026 

21026 

0027 

21026 

0028 

21027 

0029 

21030 

0030 

21031 

0031 

21032 

0032 

21033 

0033 

21034 

0034 

21035 

00 3* 

21036 

0036 

21037 

003 7 

21040 

003 8 

21041 

0039 

21042 

0040 

21043 

0041 

21044 

0042 

21045 

0043 

21046 

0044 

21047 

0045 

21050 

0046 

21051 

0047 

21052 

00 48 

2105 3 

004 9 

21054 

0050 

21055 

0051 

21056 

0052 

21057 

0053 

21060 

0054 

21061 

0055 

21062 

0066 

21063 

0057 

21064 


000007 


0 

16 

00465 

000201 

140040 

0401 

77 

0 

04 

21444 

0 

02 

00464 

0 

16 

00465 

0 

06 

21444 

0 

06 

21514 

0 401 

63 

0 

04 

21444 

0 

02 

00464 

0 

16 

00464 

0411 

77 

0 

06 

21444 

0 

04 

21472 

0 

0? 

00470 

000201 

0 

16 

00471 

000201 

140040 

0401 

77 

0 

04 

21444 

0 

02 

00470 

0 

16 

00471 

0 

06 

21444 

0 

06 

21514 

0401 

63 

0 

04 

21444 

0 

0 2 

00470 

0 

16 

00470 

0411 

77 

0 

06 

21444 

0 

04 

21474 

0 

02 

00474 


000201 


0 16 00475 
000201 


1400* 

*0 

0401 

77 

0 

04 

21444 

0 

02 

00474 

0 

16 

00475 

0 

06 

21444 

0 

06 

21514 

0401 

63 

0 

04 

21444 

0 

02 

00474 

0 

16 

00474 

0411 

77 


• 2 1 000 
VELA 
IRCO 
*# 

RX2 

DBL 

MPY RX2 

IAB 

CRA 

LRS 1 
DST Tl 
DLD HX 1 
MPY RX2 
DAD Tl 
DAD SQFD 
LRS 13 
DST Tl 
DLD RX 1 
MPY RX1 
LLS 1 
DAD Tl 
DST RXSQ 
DLD RY1 
IAB 

MPY PY2 

IAB 

CRA 

LRS 1 
DST Tl 
DLD RY 1 
MPY RY2 
DAD Tl 
DAD SQPD 
LRS 13 
DST Tl 
DLD RY 1 
MPY PY1 
LLS 1 
DAD Tl 
DST RYSQ 
DLD RZ1 
IAB 

MPY RZ2 

IAB 

CRA 

LRS 1 
DST Tl 
DLD RZ 1 
MPY RZ2 
DAD Tl 
DAD SQRD 
LRS 13 
DST Tl 
DLD RZ 1 
MPY RZ1 
LLS 1 
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MirPOCOMP TFLECDHHTTNICAT ED DATA 



Dn n - 

516 

ASS 

EHRLY 

LISTING 


OO r -R 

21065 

0 

06 

21444 

DAD 

T 1 

0059 

21066 

0 

04 

21476 

D ST 

RZ SO 

ooso 

21067 

0 

02 

00460 

DID 

LI 

onr.i 

21070 

000201 

I A P 


cor? 

21071 

0 

16 

00465 

MPY 

RX2 ■ 

00 6 3 

21072 

C00201 

TAB 


0064 

21073 

140040 

CRA 


0066 

21074 

0 

04 

21 444 

DST 

T1 

0066 

21076 

0 

02 

00460 

DID 

LI 

nn6 7 

21076 

0 

16 

00465 

*PY 

RX2 

0 0 6 R 

21077 

0 

06 

21444 

DAD 

T 1 

0060 

21100 

0 

04 

21444 

DST 

Tl 

0070 

21101 

0 

02 

00464 

DID 

RX 1 

00^1 

21102 

0 

16 

00461 

HPY 

L2 

007? 

21103 

0 

06 

21444 

DAD 

Tl 

0071 

21 104 

0 

06 

21516 

DAD 

CPRD 

0074 

21106 

040 1 

62 

LRS 

14 

00*TS 

21106 

0 

04 

21444 

DST 

Tl 

0016 

71107 

0 

02 

00460 

DLD 

T 1 

oon 

21110 

0 

16 

00464 

HPY 

R XI 

007M 

21111 

0411 

77 

LLS 

1 

nnia 

21112 

0 

06 

21 444 

DAD 

Tl 

00 8 0 

21113 

0 

04 

21500 

DST 

IPX 

r or i 

21114 

0 

02 

00460 

DLD 

LI 

o n 9 

71116 

000201 

IAB 


OOP? 

21116 

0 

16 

00471 

HPY 

PY2 

COP u 

21117 

000201 

TAB 


POP* 

21120 

140040 

CRA 


00>»6 

21121 

0 

04 

21444 

DST 

Tl 

0087 

21122 

0 

02 

00460 

DLD 

LI 

00R8 

21123 

0 

16 

00471 

HPY 

RY 2 

con° 

21124 

0 

06 

21444 

DAD 

Tl 

OORO 

21126 

0 

04 

21444 

DST 

Tl 

00*»1 

21 126 

0 

02 

00470 

DID 

PY1 

009 ? 

21127 

0 

16 

00461 

MPY 

12 

0097 

21130 

0 

0 6 

21444 

DAD 

Tl 

orou 

21131 

0 

06 

21516 

DAD 

CPPD 

0 0 Q s 

21132 

0401 

62 

IRS 

14 

00 Q 6 

21133 

0 

04 

21444 

DST 

Tl 

00 Q 7 

21134 

0 

02 

00460 

DLD 

LI 

00 OP 

21135 

0 

16 

00470 

HPY 

RY 1 

00 4 9 

21136 

0411 

77 

LLS 

1 

0 100 

21137 

0 

06 

21444 

DAD 

Tl 

0 10 1 

21140 

0 

04 

21502 

DST 

LP Y 

0102 

2114 1 

0 

02 

00460 

DLD 

LI 

0107 

21 142 

000201 

IAB 


0104 

2114 3 

0 

16 

00475 

HPY 

R7 2 

oms 

21144 

000201 

IAB 


0106 

21^46 

140040 

CRA 


0107 

21146 

0 

04 

21444 

DST 

Tl 

010 8 

21147 

0 

02 

00460 

DLD 

LI 

0 10*> 

21150 

0 

16 

00475 

HPY 

RZ2 

0110 

21161 

0 

06 

21444 

DAD 

Tl 

0111 

21152 

0 

04 

21444 

DST 

Tl 

0112 

21163 

0 

0? 

00474 

DID 

PZ1 

Oil 1 

21154 

0 

16 

00461 

HPY 

L2 

0114 

21155 

0 

06 

21444 

DAD 

Tl 
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MICROCOMP TELECOMMUNICATED DATA 


DDP-516 ASSEMBLY LISTING 


0115 21156 

0 06 21516 

DAO 

0116 21157 

0401 62 

LRS 

0117 21160 

0 04 21444 

DST 

0118 21161 

0 02 00460 

DLD 

0110 21162 

0 16 00474 

MPY 

0120 21163 

0411 77 

LLS 

0121 21164 

0 06 21444 

DAD 

0122 21165 

0 04 21504 

DST 

0123 21166 

0 02 00464 

DLD 

0124 21167 

000201 

IAB 

0126 21170 

0 16 00471 

MPY 

0126 21171 

000201 

TAB 

0127 21172 

140040 

CRA 

0128 21173 

0 04 21444 

DST 

0124 21174 

0 02 00464 

DLD 

0130 21175 

0 16 00471 

MPY 

0131 21176 

0 06 21444 

DAD 

0132 21177 

0 04 21444 

DST 

0133 21200 

0 02 00470 

DLD 

0134 21201 

0 16 00465 

MPY 

0135 21202 

0 06 21444 

DAD 

0136 21203 

0 06 21516 

DAD 

0137 21204 

0401 62 

LRS- 

0138 21205 

0 04 21444 

DST 

0138 21206 

0 02 00464 

DLD 

0140 21207 

0 16 00470 

MPY 

0141 21210 

0411 77 

LLS 

0142 21211 

0 06 21444 

DAD 

0143 21212 

0 04 21506 

DST 

0144 21213 

0 02 00464 

DLD 

0145 21214 

000201 

TAB 

0146 21215 

0 16 00475 

MPY 

0147 21216 

000201 

IAB 

0148 21217 

140040 

CRA 

0148 21220 

0 04 21444 

DST 

0150 21221 

0 02 00464 

DLD 

0151 21222 

0 16 00475 

MPY 

0152 21223 

0 06 21444 

DAD 

0153 21224 

0 04 21444 

DST 

0154 21225 

0 02 00474 

DLD 

0155 21226 

0 16 00465 

MPY 

0156 21227 

0 06 21444 

DAD 

0157 21230 

0 06 21516 

DAD 

0158 21231 

0401 62 

LRS 

0158 21232 

0 04 21444 

DST 

0160 21233 

0 02 00464 

DLD 

0161 21234 

0 16 00474 

MPY 

0162 21235 

0411 77 

LLS 

0163 21236 

0 06 21444 

DAD 

0164 21237 

0 04 21510 

DST 

0165 21240 

0 02 00470 

DLD 

0166 21241 

000201 

TAB 

0167 21242 

0 16 00475 

MPY 

0168 21243 

000201 

TAB 

0168 21244 

140040 

CRA 

0170 21245 

0 04 21444 

DST 

0171 21246 

0 02 00470 

DLD 


CPRD 

14 

T1 

LI 

FZl 

1 

Tl 

LPZ 

RX1 

RY2 


Tl 

RXl 

BY 2 

Tl 

Tl 

RY1 

RX2 

Tl 

CPPD 

14 

Tl 

BX1 

RT1 

1 

Tl 

RXRY 

PX1 

RZ2 


Tl 
EX 1 
EZ2 
Tl 
Tl 
RZ 1 
RX2 
Tl 

CPRD 
14 
Tl 
RX 1 
RZ1 
1 

Tl 

RXRZ 

RY1 

RZ2 


Tl 

RY1 
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microchip telecommunicated data 

DDP-516 ASSEMBLY LISTING 


0172 21247 
0 173 2 1 2 SO 
0174 2 1 2 SI 
0 1 T 5 71252 

0176 21253 

0177 21764 
0179 21266 
0179 21256 
018 0 2 125T 
0 1 R 1 21260 
018? 21261 

0 183 2 1 ?6 2 
018*4 21263 
01R5 21264 
0186 21266 
0187 21266 

01 R" 21267 
0189 21270 
D1Q0 21271 
i)ioi 2127? 
019? 21273 
0199 21274 
01 09 2 1 ?7 8 
0196 21276 
0 1 ° 6 21 277 
0 1 Q 7 21300 

0199 21301 
0 1 ° 9 21 302 

0200 21303 

0201 21304 

0202 21306 

0203 21306 

0204 21307 

0205 21310 

0206 21311 

0207 21 312 

0208 21313 

0209 21314 

0210 21315 

0211 21316 

0212 21317 

0213 21320 

0214 21321 

0215 21322 

0216 21323 

0217 21324 

0218 21326 

0219 21326 

0220 21327 

0221 21330 

0222 21331 

0223 21332 

0224 21333 

0225 21334 

0226 21335 

0227 21336 

0228 21337 


0 16 00476 
n r)6 21444 
0 04 21444 
0 02 00474 
0 16 00471 
0 06 21444 
0 06 21516 
0401 62 
0 04 21444 
0 0? 00470 
0 16 00474 
0411 77 
0 08 214U4 
0 04 21612 
0 02 21520 
0 07 21474 
0 07 2147K 
0 04 21450 
0 02 21506 
0 07 21504 
0 04 21452 
0 02 21510 
0 06 21502 
0 04 21454 
0 02 21620 
0 07 21472 
0 07 21476 
0 04 21460 
0 02 21612 
0 07 21500 
0 04 21462 
0 02 21506 
0 06 21504 
0 04 21456 
0 02 21520 
0 07 21472 
0 07 21474 
0 04 21470 
0 02 21510 
0 07 21502 
0 04 21464 
0 02 21512 
0 06 21500 
0 04 21466 
0 02 21450 
0 16 00614 
0 04 00656 
0 02 21452 
0 16 00616 
0 06 00656 
0 04 00656 
0 02 21454 
0 16 00620 
0 06 00656 
0411 75 
0 04 00656 
0 02 21456 


MPY 

RZ2 

DAD 

T1 

DST 

T 1 

DLD 

RZ1 

MPY 

R.Y 2 

DAD 

Tl 

DAD 

CPRD 

LPS 

14 

DST 

Tl 

DLD 

RY1 

MPY 

RZ 1 

LLS 

1 

DAD 

Tl 

DST 

RYFZ 

DLD 

ONOT 

DSB 

PTSQ 

DSB 

PZSO 

DST 

F X X 

DLD 

RXFY 

DSB 

LPZ 

DST 

FXY 

DIP 

RXPZ 

DAD 

LPY 

DST 

FX7 

DLD 

ONOT 

DSB 

RXSO 

DSB 

PZSQ 

DST 

PYY 

DLD 

RYRZ 

nsB 

LRX 

DST 

FYZ 

DLD 

PXPY 

DAD 

LPZ 

DST 

FYX 

DLD 

ONOT 

DSB 

PXSQ 

DSB 

PYSQ 

DST 

FZZ 

DLD 

RXPZ 

DSB 

LRY 

DST 

FZX 

DLD 

RYRZ 

DAD 

LRX 

DST 

FZY 

DLD 

PXX 

MPY 

DVBX 

DST 

DVIX 

DLD 

FXY 

MPY 

DV BY 

DAD 

DVIX 

DST 

DVIX 

DLD 

FXZ 

MPY 

DV BZ 

DAD 

DVIX 

LLS 

3 

DST 

DVIX 

DLD 

FYX 
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MTCflOCOHP TELECOMMUNICATED DATA 



npp- 

516 

ASSEMBLE 

LISTING 


0 22? 

21340 

0 

16 

00614 

MPT 

DVBX 

0230 

21341 

0 

04 

00660 

DST 

DVIY 

0231 

21342 

0 

02 

21460 

OLD 

PYY 

0232 

21343 

0 

16 

00616 

MPT 

DV BY 

0233 

21344 

0 

06 

00660 

DAD 

DVIY 

0234 

21345 

0 

04 

00660 

DST 

DVIY 

0235 

21346 

0 

02 

21462 

DLD 

FYZ 

0236 

21347 

0 

16 

00620 

HPT 

DVBZ 

023? 

21350 

0 

06 

00660 

DAD 

DVIY 

0235 

21351 

0411 

75 

LLS 

3 

0239 

21352 

0 

04 

00660 

DST 

DVIY 

0240 

21353 

0 

02 

21464 

DLD 

FZX 

0241 

21354 

0 

16 

00614 

MPT 

DVBX 

0242 

21355 

0 

04 

00662 

DST 

DVIZ 

0243 

21356 

0 

02 

21466 

DLD 

FZY 

0244 

21357 

0 

16 

00616 

MPY 

DV BY 

0245 

21360 

0 

06 

00662 

DAD 

DVIZ 

0246 

21361 

0 

04 

00662 

DST 

DVIZ 

0247 

21 362 

0 

02 

21470 

DLD 

FZZ 

024 3 

21363 

0 

16 

00620 

MPY 

DVBZ 

0249. 

21364 

0 

06 

00662 

DAD 

DVIZ 

0250 

21365 

0411 

75 

LLS 

3 

0251 

21366 

0 

04 

00662 

DST 

DVIZ 

0252 

21367 

0 

02 

00614 

DLD 

DVBX 

0253 

21370 

0 

16 

21451 

MPY 

FXX+1 

0254 

21371 

0 

04 

21444 

DST 

T 1 

0255 

21372 

0 

02 

00616 

DLD 

DVBY 

0266 

21373 

0 

16 

21453 

MPY 

FXY*1 

0257 

21 374 

0 

06 

21444 

DAD 

Tl 

0258 

21375 

0 

04 

21444 

DST 

T1 

0259 

21376 

0 

02 

00620 

DLD 

DVBZ 

0260 

21377 

0 

16 

21455 

MPY 

FXZO 

0261 

21400 

0 

06 

21444 

DAD 

Tl 

0262 

21401 

0 

06 

21514 

DAD 

SQRD 

0263 

21402 

0401 

64 

LBS 

12 

0264 

21403 

0 

06 

00656 

DAD 

DVIX 

0265 

21404 

0 

04 

00656 

DST 

DVIX 

0266 

21405 

0 

02 

00614 

DLD 

DVBX 

0267 

21406 

0 

16 

21457 

MPY 

FYX+1 

0268 

21407 

0 

04 

21444 

DST 

Tl 

0269 

21410 

0 

02 

00616 

DLD 

DVBY 

0270 

21411 

0 

16 

21461 

MPY 

FT Y» 1 

0271 

2141? 

0 

06 

21444 

DAD 

Tl 

0272 

21413 

0 

04 

21444 

DST 

Tl 

0273 

21414 

0 

02 

00620 

DLD 

DVBZ 

0274 

21415 

0 

16 

21463 

MPY 

FYZ *1 

0275 

21416 

0 

06 

21444 

DAD 

Tl 

0276 

21417 

0 

06 

21514 

DAD 

SQBD 

0277 

21420 

0401 

64 

LBS 

12 

0278 

21421 

0 

06 

00660 

DAD 

DVIY 

0279 

21422 

0 

04 

00660 

DST 

DVIY 

0280 

21423 

0 

02 

00614 

DLD 

DVBX 

0281 

21424 

0 

16 

21465 

HPT 

FZXM 

0282 

21425 

0 

04 

21444 

DST 

Tl 

0283 

21426 

0 

02 

00616 

DLD 

DVBY 

0284 

21427 

0 

16 

21467 

MPY 

FZY +1 

0285 

21430 

0 

06 

21444 

DAD 

Tl 



MTCROCO^P TELECOM F ON I CAT ED DATA 



PDP- 

516 ASSEMBLY 

LISTING 


0236 

21431 

0 04 21444 


DST 

T 1 

0281 

21432 

0 02 00620 


DID 

DVBZ 

02PP 

214 33 

0 16 21471 


MPY 

F7 7 + 1 

02PO 

2143^ 

0 06 21444 


DAD 

H 

02°0 

214 3* 

0 06 21514 


DAD 

SQPO 

02° 1 

21436 

0401 64 


I.BS 

12 

0? Q 2 

21437 

0 06 00662 


DAD 

DVTZ 

02° 2 

21440 

0 04 00662 


DST 

DVIZ 

o 2 ° 4 

rv r» n f 

21441 

21442 

000005 
-0 01 21000 


SGL 

JNP* 

VFI A 

02m 

21444 

000000 

T 1 

DBP 

0 

0201 

2 1 4 4 * 
21446 

oooooo 

oooooo 

T2 

DBP 

0 

0 2 Q 8 

21447 

21450 

ooooro 

oooooo 

FXX 

DBP 

0 

0 p oq 

214 51 
21452 

oooooo 

oooooo 

FXY 

DBP 

0 

omo 

21453 

21454 

oooooo 
oooo no 

pV7 

DBP 

0 

mo i 

21455 

21486. 

onooon 

oooooo 

FYX 

DBP 

0 

0 302 

21457 
214 6 0 

oooooo 

oooooo 

FYY 

DBP 

0 

03 0 3 

21461 
214 6 2 

oooooo 

oooooo 

FYZ 

DBP 

0 

0 3 0 <3 

214 6 3 
214 6 4 

oooooo 

oooooo 

FZX 

DBP 

0 

0 ?os 

21465 

214«6 

oooooo 

oooooo 

FZY 

DBP 

0 

0 3 OP 

21467 
214 7 0 

oooooo 

oooooo 

F7Z 

DBP 

0 

0301 

21471 

21472 

oooooo 

oooooo 

RX SO 

DBP 

0 

0308 

214 7 3 
214 74 

nnoooo 

oooooo 

RYSO 

DEP 

0 

0300 

21475 

21476 

oooooo 

oooooo 

RZS 0 

DBF 

0 

0 310 

21477 

21500 

oooooo 

oooooo 

LFX 

DBP 

n 

03 1 1 

2 1501 
215Q? 

oooooo 

oooooo 

I RY 

DBP 

0 

03 12 

21503 
2 1 ^04 

000700 

oooooo 

LPZ 

DBP 

0 

0313 

2 1 8 0 5 
21506 

oooooo 

oooooo 

RXRY 

DBP 

0 

0 3 1M 

71^07 

21510 

oooooo 

onoooo 

RXR7 

DBP 

0 

07 18 

2 1 r 1 1 

21512 

oooooo 

onoooo 

RYRZ 

DBP 

0 

0 316 

2 1 c 1 3 
21514 

oooooo 

oooooo 

sqpo 

OCT 

0, 10000 

0311 

21516 

21516 

oioono 

oooooo 

C PRD 

OCT 

0, 20000 

03 in 

21517 

21520 

020000 

020000 

ONOT 

OCT 

20000, 0 

0310 

21521 

oooooo 

000460 

LI 

eod 

' 460 
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NTCFOCOMP TELECOM HUN I CAT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0320 


000461 

L2 

EQU 

L1M 

0321 


000464 

RX1 

BOO 

L1*4 

0322 


000465 

8X2 

eoo 

LI *5 

0323 


000470 

RY1 

EQO 

LI +8 . 

0324 


000471 

HY2 

EQO 

L1*9 

032*5 


000474 . 

RZ1 

EQO 

LI M 2 

0326 


000475 

RZ2 

EQO 

L1M3 

0327 


000614 

DVBX 

EQO 

•614 

0328 


000616 

DTBY 

EQO 

DVBX*2 

0329 


000620 

DVBZ 

EOO 

DVBX + 4 

0330 


000656 

DTIX 

EQO 

*656 

0331 


000660 

DTIY 

EQO 

, DTIX* 2 

0332 


000662 

DTIZ 

EQO 

DVIX*4 

0333 


000310 

DTIX 

EOO 

• 310 

0334 


000312 

DTIY 

EQO 

DTIX* 2 

0335 


000314 

DTIZ 

EOO 

DTIX*4 

0336 


000414 

DTBX 

EOO 

• 4 14 

0337 


000416 

DTBY 

EOU 

DTBX*2 

0138 


000420 

DTBZ 

EOO 

DTBX+4 

033 0 

21522 

0 000000 

I RCO 

DAC 

** 

0340 

21523 

000007 


DBL 


0341 

21524 

0 02 00310 


DLD 

DTIX 

0342 

21525 

0 16 21451 


MPY 

FXX*1 

0343 

21526 

0 04 21446 


DST 

T2 

0344 

21527 

0 02 21450 


DLD 

PXX 

0345 

21530 

0 16 00311 


MPY 

DTIX+1 

0346 

21531 

0 06 21446 


DAD 

T2 

0347 

21532 

0401 61 


LRS 

15 

0348 

21533 

0 04 21444 


DST 

T1 

034 9 

21534 

0 02 00310 


DLD 

DTIX 

0350 

21535 

0 16 21450 


MPY 

PXX 

0351 

21536 

0 06 21444 


DAD 

T 1 

0352 

21537 

0 04 21444 


DST 

T1 

0353 

21540 

0 02 00312 


DLD 

DTIY 

0354 

21541 

0 16 21457 


MPY 

PYX* 1 

0365 

21542 

0 04 21446 


DST 

T2 

0356 

21543 

0 02 21456 


DLD 

PYX 

0353 

21544 

0 16 00313 


MPY 

DTIYM 

0358 

21545 

0 06 21446 


DAD 

T2 

0350 

21546 

0401 61 


LRS 

15 

0360 

21547 

0 06 21444 


DAD 

T1 

0361 

21550 

0 04 21444 


DST 

T 1 

0362 

21551 

0 02 00312 


DLD 

DTIY 

0363 

21552 

0 16 21456 


MPY 

PYX 

0364 

21553 

0 06 21444 


DAD 

T1 

0365 

21554 

0 04 21444 


DST 

T1 

0366 

21555 

0 02 00314 


DLD 

DTIZ 

0367 

21556 

0 16 21465 


MPY 

PZX + 1 

0368 

21557 

0 04 21446 


DST 

T2 

0369 

21560 

0 02 21464 


DLD 

FZX 

0370 

21561 

0 16 00315 


MPY 

DTIZ*1 

0371 

21562 

0 06 21446 


DAD 

T2 

0372 

21563 

0401 61 


LRS 

15 

0373 

21564 

0 06 21444 


DAD 

T1 

0374 

21565 

0 04 21444 


DST 

T1 

0375 

21566 

0 02 00314 


DLD 

DTIZ 

0376 

21567 

0 16 21464 


MPY 

FZX 
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MICROCOMP telecommunicated data 



DDP- 

516 

ASSEMBLY 

LISTING 


0377 

21570 

0 

06 

21444 

DAD 

Tl 

0378 

21571 

0 

06 

00414 

DAD 

DTBX 

0 370 

21572 

0 

04 

00414 

DST 

DTBX 

0300 

21573 

0 

02 

00310 

DLD 

DTIX 

0381 

21574 

0 

16 

21453 

HPY 

FXY+1 

03 32 

21575 

0 

04 

21446 

DST 

T? 

03 83 

21576 

0 

02 

21452 

DLP 

FXY 

0384 

21577 

0 

16 

00311 

MPY 

DTIX+1 

0305 

21600 

0 

06 

21446 

DAD 

T2 

0386 

21601 

0401 

61 

LRS 

15 

0387 

21602 

0 

04 

21444 

DST 

Tl 

0388 

21603 

0 

02 

00310 

DLD 

DTIX 

0389 

21604 

0 

16 

21452 

MPY 

FXY 

0300 

21605 

0 

06 

21444 

DAD 

Tl 

0391 

21606 

0 

04 

21444 

DST 

Tl 

0392 

21607 

0 

02 

00312 

DLD 

DTIY 

0 39 3 

21 610 

0 

16 

21461 

MPY 

FYY+1 

03 Q 4 

21611 

0 

04 

21446 

DST 

T2 

0 39 5 

21612 

0 

02 

21460 

DLD 

FYY 

0396 

21613 

0 

16 

00313 

MPY 

DTIY + 1 

0397 

21614 

0 

06 

21446 

DAD 

T2 

0398 

21615 

0401 

61 

LRS 

15 

0399 

21616 

0 

06 

21444 

DAD 

Tl 

0400 

21617 

0 

04 

21444 

DST 

Tl 

0 401 

21620 

0 

02 

00312 

DLD 

DTIY 

0402 

21621 

0 

16 

21460 

MPY 

FYY 

0403 

21622 

0 

06 

21444 

DAD 

Tl 

0404 

2162 3 

0 

04 

21444 

DST 

Tl 

0 40 5 

21624 

0 

02 

00314 

DLD 

DTI Z 

0406 

21625 

0 

16 

21467 

MPY 

FZY + 1 

0407 

21626 

0 

04 

21446 

DST 

T2 

0409 

21627 

0 

02 

21466 

DLD 

FZY 

0 400 

21630 

0 

16 

00315 

MPY 

DTIZ+1 

0410 

21631 

0 

06 

21446 

DAD 

T2 

0411 

21632 

0401 

61 

LRS 

15 

0412 

21633 

0 

06 

21444 

DAD 

Tl 

0413 

21634 

0 

04 

21444 

DST 

Tl 

0414 

21635 

0 

02 

00314 

DLD 

DTIZ 

0415 

21636 

0 

16 

21466 

MPY 

FZY 

0416 

21637 

0 

06 

21444 

DAD 

Tl 

0417 

21640 

0 

06 

00416 

DAD 

DTBY 

0418 

21641 

0 

04 

004 16 

DST 

DTBY 

0419 

21642 

0 

02 

00310 

DLD 

DTIX 

0420 

21643 

0 

16 

21455 

MPY 

FXZ + 1 

0421 

21644 

0 

04 

21446 

DST 

T2 

0422 

21645 

0 

02 

21454 

DLD 

FXZ 

0423 

21646 

0 

16 

00311 

MPY 

DTIX+1 

0424 

21647 

0 

06 

21446 

DAD 

T2 

0425 

21650 

0401 

61 

LRS 

15 

0426 

21651 

0 

04 

21444 

DST 

Tl 

0427 

21652 

0 

02 

00310 

DLD 

DTIX 

0429 

21653 

0 

16 

21454 

MPY 

FXZ 

0429 

21654 

0 

06 

21444 

DAD 

Tl 

04 30 

21655 

0 

04 

21444 

DST 

Tl 

0431 

21656 

0 

02 

00312 

DLD 

DTIY 

0432 

21657 

0 

16 

21463 

MPY 

FYZ + 1 

0433 

21660 

0 

04 

21446 

DST 

T2 
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1 1 CR PCOfl P TELECOMMUNICATED DATA 



DDP- 

616 

ASSEMBLY 

LISTING 


0434 

21661 

0 

02 

21462 

DID 

FYZ 

0436 

21662 

0 

16 

00313 

MPY 

DTIY+1 

0436 

21663 

0 

06 

21446 

DAD 

T2 

0437 

21664 

0401 

61 

LRS 

15 

0 43 R 

21666 

0 

06 

21444 

DAD 

T 1 

0439 

21666 

0 

04 

21444 

DST 

Tl 

0 44 0 

21667 

0 

02 

00312 

DID 

DTIY 

0441 

21670 

0 

16 

21462 

mpy 

PYZ 

0442 

21671 

0 

06 

21444 

DAD 

Tl 

04 4 3 

21672 

0 

04 

21444 

DST 

Tl 

0444 

21673 

0 

02 

00314 

DID 

DTTZ 

0 44 6 

21674 

0 

16 

21471 

MPY 

FZZ+1 

0446 

21675 

0 

04 

21446 

DST 

T2 

0447 

21676 

0 

02 

21470 

DLD 

FZZ 

G 44 8 

21677 

0 

16 

00315 

BPY 

DTTZ ♦ 1 

0449 

21700 

0 

06 

21446 

DAD 

T2 

0460 

21701 

0401 

61 

LRS 

15 

0461 

21702 

0 

06 

21444 

DAD 

Tl 

04 6 2 

21703 

0 

04 

21444 

DST 

Tl 

0463 

21704 

0 

02 

00314 

DLD 

DTI Z 

0464 

21706 

0 

16 

21470 

MPY 

FZZ 

0 466 

21706 

0 

06 

21444 

DAD 

Tl 

0 466 

21707 

0 

06 

00420 

DAD 

DTFZ 

0467 

21710 

0 

04 

00420 

DST 

DTBZ 

0468 

21711 

000006 

SGL 


0469 

0460 

21712 

-0 

01 

21522 

JMP* 

END 

I RCO 
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PROGRAM NAME: 

SOURCE: MLPF 
BINARY: BMLPF 

ENTRY POINTS (LOCATION): PIPR ( ’22000) GY PR ( ’22053) 

GENERAL DESCRIPTION: 

The subroutine PIPR takes the six AV's from the accelerometers 
and effectively multiplies them by the matrix corresponding to the accelerometer 
working fail status to yield AV g. The six AV's are stored in locations '600, 
'602, '604, '606, '610 and '612. AV^ is stored (double precision) in locations 

SD 

'6 1 4, '616 and '620. The high order of AVg is zeroed prior to this multiplication 
and the double precision calculated AVg is added to the residual low order 
of locations '614, '616 and '620. The accelerometer first and second failures 
are stored in locations '320 and '321. 

The subroutine GYPR does an analagous multiply for the gyros 

_ _ ^ 

except at the end,in addition, it scales A0 B to 2 radians by effectively 
multiplying by 7/4. 
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MTfROCOMP TELECOMMUNICATED DATA 



OOP- 

-516 

ASSEMBLY 

LISTING 


0001 






SOBR 

PIPR 

000? 






SOBR 

GYPP 

0003 






ABS 


OOOtt 






ORG 

*22000 

0005 






SETB 

BAS1 

0005 

22000 




BAS 1 

BSS 

20 

0007 

2202U 

0 

000000 

PIPE 

DAC 

** 

0000 

22025 

000007 


DBL 


0000 

22026 

0 

02 

00320 


OLD 

•320 

0010 

22027 

0 

04 

22134 


DST 

FI, ST 

0011 

2 2030 

000005 


SGL 


001? 

2203 1 

140040 


CPA 


0013 

22032 

0 

04 

221 32 


STA 

INST 

oom 

22033 

0 

04 

00614 


STA 

•614 

0015 

22034 

0 

04 

00616 


STA 

*616 

0016 

22035 

0 

04 

00620 


STA 

*620 

0017 

22036 

0 

02 

00600 


LDA 

*600 

001ft 

22037 

0 

04 

22124 


STA 

TDA 

0010 

2?ftU0 

0 

0? 

00602 


LDA 

*602 

0020 

22041 

0 

04 

22125 


STA 

TDB 

oo?i 

22042 

0 

02 

00604 


LDA 

*604 

002? 

22043 

0 

04 

22126 


STA 

TDC 

0021 

22044 

0 

02 

00606 


LDA 

*6 06 

0024 

22045 

0 

04 

22127 


STA 

TDD 

0025 

22046 

0 

0? 

00610 


T DA 

*610 

0026 

22047 

0 

04 

22130 


STA 

TDK 

0027 

22050 

0 

02 

00612 


LDA 

•612 

0028 

22051 

0 

04 

22131 


STA 

TDF 

00 ?o 

22052 

0 

01 

22102 


JNP 

CHPR 

00 30 

22053 

0 

000000 

GY PR 

DAC 

** 

0031 

22054 

000007 


DBL 


003? 

22055 

0 

02 

00316 


OLD 

*316 

0033 

22056 

0 

04 

22134 


DST 

FLST 

0034 

22057 

000005 


SGL 


0035 

22060 

140040 


CPA 


0036 

22061 

0 

04 

00414 


STA 

*414 

0037 

22062 

0 

04 

00416 


STA 

•416 

0038 

22063 

0 

04 

00420 


STA 

*420 

0030 

22064 

1< 

41206 


AOA 


oono 

22065 

0 

04 

22132 


STA 

INST 

non i 

22066 

0 

02 

00400 


LDA 

*400 

004? 

22067 

0 

04 

22124 


STA 

TDA 

0043 

22070 

0 

02 

00402 


JDA 

'402 

0044 

22071 

0 

04 

22125 


STA 

TDB 

0045 

22072 

0 

02 

00404 


LDA 

*404 

0046 

22073 

0 

04 

22126 


STA 

TDC 

0047 

22074 

0 

02 

00406 


LDA 

•406 

0048 

220*15 

0 

04 

22127 


STA 

TDD 

0040 

22076 

0 

02 

00410 


LDA 

*410 

00^0 

22077 

0 

04 

22130 


STA 

TDE 

0051 

22100 

0 

02 

00412 


LDA 

*412 

0052 

22101 

0 

04 

22131 


STA 

TDF 

0053 

22102 

0 

02 

22135 

CMPP 

LDA 

FLST+1 

0054 

22103 

0 

11 

22134 


CAS 

FLST 

0055 

22104 

0 

01 

22107 


.IMP 

*+3 

00 56 

22105 

101000 


NOP 


0057 

22106 

0 

01 

22111 


.IMP 

*+3 
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MTCFOCOMP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0058 

22107 

0 

13 22134 


ISA 

PL ST 

0059 

22110 

0 

13 22135 


IMA 

FLST+1 

0060 

22111 

0 

02 22135 


IDA 

FLST+1 

0061 

22112 

101040 


SEE 


006? 

22113 

0 

01 22121 


JHP 

*♦6 

0063 

22114 

0 

02 23557 


LOA 

*11 

0064 

22115 

0 

07 22135 


SOB 

FLSTM 

0065 

22116 

0 

16 22135 


MPT 

FLST+1 

0066 

22117 

000201 


TAB 


0067 

22120 

0401 77 


IRS 

1 

0068 

22121 

0 

06 22134 


ADO 

FIST 

006*5 

22122 

0 

04 00000 


STA 

0 

0070 

22123 

-1 

01 22136 


JHP* 

FLAD, 1 

0071 

22124 

ooonoo 

TO A 

OCT 

0 

0072 

22125 

000000 

TOB 

OCT 

0 

0073 

22126 

000000 

TOC 

OCT 

0 

00^4 

22127 

000000 

TOD 

OCT 

0 

0075 

22130 

000000 

TDE 

OCT 

0 

007^ 

22131 

000000 

TDP 

OCT 

0 

0077 


000366 

KTMP 

POO 

*366 

00^8 


000 3^2 

TOT 

poo 

» 372 

007Q 


000374 

TOY 

POO 

*374 

0080 


O0O3 7 6 

TO Z 

POO 

* 376 

00R1 

22132 

000000 

INST 

DEC 

0 

OOP? 

22V34 

oooooo 

FLST 

DBP 

0 


22135 

000000 




008 3 

22136 

0 

022416 

PL AD 

DAC 

NOFL 

0084 

22137 

0 

022423 


OAC 

API 

0086 

22140 

0 

022450 


DAC 

B*L 

0086 

22141 

0 

022501 


OAC 

CPL 

0087 

22142 

0 

022525 


DAC 

DPL 

0088 

22143 

0 

022555 


DAC 

PFL 

0089 

22144 

0 

022601 


DAC 

PPL 

0090 

22145 

0 

022630 


DAC 

ABPL 

0091 

22146 

0 

022650 


DAC 

ACFL 

0092 

22147 

0 

022705 


DAC 

ADFL 

0063 

22150 

0 

022743 


DAC 

AEFL 

0094 

22151 

0 

023001 


DAC 

APPL 

0095 

22152 

0 

023034 


DAC 

BCFL 

0096 

22153 

0 

023066 


DAC 

BOFL 

009’ 7 

22154 

0 

023131 


DAC 

REFL 

0098 

22155 

0 

023166 


DAC 

BPFL 

0099 

22156 

0 

023230 


OAC 

CDFL 

0100 

22157 

0 

023247 


OAC 

CEFL 

0101 

22160 

0 

023304 


DAC 

CFFL 

010? 

22161 

0 

023341 


OAC 

DFFL 

0103 

22162 

0 

023374 


OAC 

DFFL 

0104 

22163 

0 

023436 


DAC 

BFFL 

0105 

22164 

OOOOOO 


DBP 

0 


22165 

oooooo 




0106 

22166 

020645 

CSEQ 

DEC 

0. 2628655565BB0 


22167 

045016 




0107 

22170 

033161 


DEC 

0. 4253254040BBO 


22171 

004013 




0108 

22172 

OOOOOO 


DBP 

0 


22173 

oooooo 




0109 

22174 

0 11231 


DEC 

0. 14530B5058BB0 
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MTC^OCOMP TELECONMONICAT ED DftTA 



DOT>- 

516 ASSEMBLY 

LISTING 


0110 

22 175 

22176 

036014 

042575 

DEC 

0. 5420824547BBO 

0111 

22177 

22200 

013015 
0074 14 

DEC 

0. 117557O507BB0 

0112 

22201 

22207 

007002 

000000 

DBP 

0 

on i 

22203 

22204 

000000 

047311 

DEC 

0.6155367 07 5B BO 

0114 

2220S 

22706 

072023 

014130 

DEC 

0. 190211 3036BB0 

0115 

22207 

22210 

066010 
0 34776 

DEC 

0. 4530768591BB0 

Oils 

22211 

22212 

033025 

oooooo 

DBP 

0 

0117 

22213 

22214 

000000 

045474 

DEC 

0. 5B7785252UBB0 

01 1R 

2271 S 
22716 

043011 

OOOOOO 

DBP 

0 

011° 

22217 

22220 

OOOOOO 

074674 

DEC 

0. Q 510565168FB0 

0 120 

22221 

22222 

016047 

OOOOOO 

DBP 

0 

0121 

22223 

22224 

oooooo 

024022 

DEC 

0. 3 1 306841 0 4BF0 

012? 

22225 

22226 

050026 

076664 

DEC 

0.9820R35861BBO 

012? 

22227 

22230 

072435 

043503 

DEC 

0. 5567581822BB0 

m24 

22231 

22232 

066422 

003155 

DEC 

0.050202P5398B30 

012S 

22233 

22234 

0 03010 
OOOOOO 

DBP 

0 

0126 

22235 

22736 

OOOOOO 

005145 

DEC 

0.081229°2423B80 

0127 

22237 

22240 

057377 

003155 

DEC 

0. 050202B5398BB0 

0120 

2224 1 
22242 

003010 

050651 

DEC 

0. 6379881064BB0 

0120 

22243 

22244 

046021 

040326 

DEC 

0. B065553282BB0 

0130 

22745 

22246 

063412 

OOOOOO 

DBP 

0 

0131 

22247 

22250 

OOOOOO 

043503 

DEC 

0. 5567581 822BB0 

0132 

22251 

22252 

066422 

026013 

DEC 

0. 3440954797PB0 

0133 

22253 

22254 

024414 

046660 

DEC 

0. 606961036 2BB0 

0134 

22755 

22256 

071432 

031170 

DEC 

0. 3942983337BB0 

0 1 3 S 

22257 

22260 

027424 

OOOOOO 

DBP 

0 

0136 

22761 

22262 

OOOOOO 
0 OOOOOO 

MOLT DAC 

** 

0137 

22263 

000007 

DBL 


0130 

22264 

1 02 22166 

OLD 

CSEQ, 1 

01 3« 

22265 

0 16 00366 

MPT 

MTMP 
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MTCnoCGMP TFLFCOrMTWTCATBn DATA 



oop 

-515 ASSEMBLY 

LISTING 


01 lift 

22765 

0 04 27344 


DST 

TACC 

014 1 

7 7257 

1 0? 27155 


DID 

CSFQ, 1 

0142 

22770 

000701 


TAB 


oim 

7727 1 

0 15 00155 


M PY 

HTHP 

0144 

22272 

0401 61 


LBS 

15 

014 5 

22?7i 

0 05 22344 


DAD 

TACC 

0145 

77?7 4 

0 04 22344 


DST 

TACC 

0147 

22775 

1 02 27170 


DL D 

CSFQ + 2, 1 

014ft 

72275 

101040 


SNZ 


0140 

22777 

0 01 27341 


iIMP 

EXM 

0 1 *o 

22 mo 

0 16 00167 


MpY 

MTMP+1 

01 51 

7 2101 

0 06 22344 


DAD 

TACC 

015? 

72107 

0 04 22344 


DST 

TACC 

0151 

22301 

1 02 27170 


DID 

CS^O*?, 1 

0 154 

72104 

000201 


TAB 


01 ^ 

72105 

0 16 00167 


M PY 

HTMP+1 

0 1*5 

77105 

0401 61 


LBS 

15 

0157 

27.107 

0 06 22344 


DAD 

TACC 

0 i 5ft 

22110 

0 04 22344 


DST 

TACC 

01 50 

2 2111 

1 07 32172 


DLD 

CSEO+4, 1 

0150 

7 2112 

101040 


SN7 


0 15 1 

27 311 

0 01 27341 


JHP 

EX H 

0 157 

721^4 

0 16 00370 


MPY 

MTMP+2 

0151 

72115 

0 06 27344 


DAD 

TACC 

0 154 

22115 

0 04 22344 


DST 

TACC 

n 1 *5 

72317 

1 0 ? 22172 


DLD 

CSEQ+4, 1 

0155 

72120 

000701 


TAR 


0157 

27121 

0 16 00370 


MPY 

MTMP+2 

0150 

22172 

0401 61 


1 BS 

15 

0150 

22121 

0 06 27344 


DAD 

TACC 

0170 

22124 

0 04 22344 


DST 

TACC 

0171 

22125 

1 02 22174 


DLD 

CSFQ+ 6 , 1 

0 172 

22326 

101040 


SN7 . 


0 17 1 

2232’ T 

0 01 27341 


.IMP 

EXM 

0 174 

22110 

0 16 00371 


M PY 

MTMP+3 

0175 

22111 

0 06 77344 


DAD 

TACC 

0 175 

2211 ? 

0 04 22344 


DST 

TACC 

0 177 

22333 

1 02 22174 


DLD 

CSKO+ 6 , 1 

0 17ft 

22114 

000201 


TAB 


0170 

22135 

0 16 00371 


MPY 

MTMP + 3 

0 1.00 

22116 

0401 61 


LFS 

15 

01«1 

2213 7 

0 06 22344 


DAD 

TACC 

0102 

22340 

-0 01 22262 


JHP* 

HOLT 

01 P.7 

22341 

0 02 22344 

EXM 

DLD 

TACC 

010 4 

22147 

-0 01 22262 


JHP* 

flniT 

0105 

22344 

nooooo 

T ACC 

DBP 

0 


22345 

nooooo 




0105 

22345 

0 000000 

XNFL 

DAC 

** 

n i R7 

22347 

140040 


TEA 


0 Iflft 

72150 

0 04 00000 


ST A 

0 

0 109 

22351 

0 02 22124 


LDA 

TDA 

01 QO 

22357 

0 07 22125 


SOB 

TDB 

Oiai 

22151 

0 04 00366 


STA 

HTHP 

0 197 

22354 

0 02 22126 


LDA 

TDC 

0 19 1 

22355 

0 06 22127 


ADD 

TDD 

0 1 Q 4 

22355 

140407 


TCA 


0105 

22357 

0 04 00367 


STA 

HTMP+1 
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NICBOCOWP TFLECOHHONICATED DATA 
DPP-516 ASSEMBLY LISTING 


0196 

22360 

0 10 22262 


JST 

NULT 

0197 

22361 

0 04 00372 


DST 

TDY 

01PR 

22362 

000005 


SGL 


019° 

22363 

-0 01 22346 


JNP* 

YNFL 

0900 

22364 

0 000000 

YNFL 

DAC 

** 

0901 

22366 

140040 


CF A 


0909 

22366 

0 04 00000 


STA 

0 

0909 

2236" T 

0 02 22127 


IDA 

TDD 

020 u 

22370 

0 07 22126 


SOB 

TDC 

020 s 

22371 

0 04 00366 


STA 

BTMp 

0206 

22372 

0 02 22130 


IDA 

TDB 

0207 

22373 

0 07 22131 


SOB 

TDF 

0200 

22374 

0 04 00367 


STA 

NTNP+1 

0 209 

22376 

0 10 22262 


JST 

NOT T 

0210 

22376 

0 04 00374 


DST 

TDY 

0211 

22377 

000005 


SGL 


0212 

92400 

>0 01 22364 


JMP* 

YNFL 

0213 

22401 

0 ooooon 

7, NFL 

DAC 

** 

0214 

22402 

140040 


CPA 


0216 

22409 

0 04 00000 


STA 

0 

0216 

22404 

0 02 22130 


IDA 

TDF 

0217 

22406 

0 06 22131 


ADD 

TDF 

02 1 P 

22406 

0 04 00366 


STA 

NT'NP 

0219 

22407 

0 0 2. 22124 


LDA 

TDA 

0220 

22410 

0 06 22125 


ADD 

TDB 

0221 

22411 

0 04 00367 


STA 

BTNP+1 

0922 

92412 

0 10 22262 


JST 

MTTIT 

022 9 

22413 

0 04 00376 


DST 

TD7 

0224 

22414 

000005 


SGI 


0225 

22415 

-0 01 22401 


JNP* 

7 NFL 

0926 

22416 

0 10 22346 

NOFL 

JST 

YNFL 

0227 

22417 

0 10 22364 


JST 

YNFL 

0229 

92420 

n 10 22401 


JST 

7NFL 

0229 

22421 

000007 


DBI 


0230 

22422 

0 01 23454 


JMP 

OUTD 

0231 

22423 

0 10 22364 

A FI 

JST 

YNFL 

0232 

22424 

0 36 23556 


IDT 

-6 

0233 

22425 

0 02 22125 


IDA 

TDB 

0234 

22426 

140407 


TCA 


023 6 

22427 

0 04 00366 


STA 

STEP 

0236 

22430 

0 02 22126 


LDA 

TDC 

0237 

22431 

0 06 22127 


A DD 

TDD 

0239 

22432 

1 40407 


TCA 


0239 

22433 

0 04 00367 


STA 

HTNP+1 

0240 

22434 

0 02 22130 


IDA 

TDF 

0241 

22435 

0 06 22131 


ADD 

TDF 

024? 

22436 

0 04 00370 


STA 

HTMP+2 

0243 

22437 

0 10 22262 


JST 

NOT T 

0244 

22440 

0 04 00372 


DST 

TDY 

0245 

22441 

000005 


SGI 


0946 

22442 

0 35 23555 


IDT 

= 14 

0247 

22443 

0 02 22125 


IDA 

TDB 

0249 

22444 

0 04 00366 


STA 

HTHP 

024Q 

22445 

0 10 22262 


JST 

HOLT 

0250 

22446 

0 04 00376 


DST 

TD7 

0261 

22447 

0 01 23454 


JBP 

OUTD 

0262 

22450 

0 10 22364 

BFL 

JST 

YNFL 
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NTCROCONP TELECONWfTNTCATFD DATA 
DDP-516 ASSEHBET EISTING 


0253 22451 0 35 23556 EDX 

0264 22452 0 02 22124 EDA 

0255 22453 0 04 00366 STA 

025*. 2 ? 4 54 0 02 22126 T DA 

025"* 22455 0 06 22127 ADD 

0258 22456 140407 TCA 

0250 22457 0 04 00367 STA 

0260 22460 0 0? 22130 EDA 

0261 22461 0 06 22131 ADD 

0262 22462 140407 TCA 

0263 22463 0 04 00370 5TA 

0264 22464 0 10 22262 -1ST 

0765 22465 0 04 00372 DST 

0266 22466 000005 SGL 

0267 22467 0 35 23555 EDX 

026^ 22470 0 02 00367 T DA 

026° 23471 140407 TCA 

0270 22472 0 04 00367 STA 

0271 22473 0 02 00370 IDA 

0*>72 22474 140407 ^CA 

07-n 22475 0 04 00370 STA 

0774 2247* 0 10 22262 1ST 

0275 22477 0 04 00376 DST 

027* 22500 0 01 23454 7 HP 

0777 22501 0 10 22401 CPL J ST 

0 77 8 22607 0 35 23555 IPX 

027° 22603 0 02 22127 T DA 

0380 72504 140407 TCA 

0 2 R 1 22505 0 04 00366 STA 

0287 22506 0 02 22130 IDA 

0283 22507 0 07 22171 SOB 

0284 22510 0 04 00767 STA 

0285 22511 0 02 22124 T DA 

0286 22512 0 07 22125 SOP 

0287 22613 0 04 00770 STA 

02R8 22614 0 10 22262 -1ST 

028° 22515 0 04 00372 PST 

0290 22516 000005 SGL 

02 Q 1 22517 0 36 23556 LDX 

0292 22520 0 02 22127 EDA 

0297 22521 0 04 00366 STA 

07P4 22522 0 10 22262 -1ST 

02°S 22523 0 04 00374 DST 

0296 22524 0 01 23454 JWP 

0297 22525 0 10 22401 DPT JS T 

02 Q 8 22526 0 35 23555 IDT 

0799 22527 0 02 22126 EDA 

0300 22530 140407 TCA 

0301 22531 0 04 00366 STA 

0302 22532 0 02 22131 EDA 

0307 22533 0 07 221 30 STJB 

0304 22634 0 04 00367 STA 

0306 22636 0 02 22124 EDA 

0706 22636 0 07 22125 SUB 

0307 22537 0 04 00370 STA 

0308 22540 0 10 22262 JST 

0309 22541 0 04 00372 DST 


*6 

TDA 

*!TKP 

TDC 

TDD 

HTF1P + 1 

TDE 

TOP 

NTFIP + 2 

HTTT.T 

TDX 

-14 

WTPP+1 

PTPP+1 
f1T*P + 2 

0T0P+2 
PUT T 
TD7 
OUTD 
7, NFL 
= 14 
TDD 

NTTP 

TDE 

TDF 

ht^p+1 

TDA 

TDB 

NTFP+2 

httt.t 

TDT 

= 6 

TDD 

*T"P 

EDIT 

TDT 

OUTD 

7NFL 

*14 

TDC 

HT*P 

TDF 

TDF 

irrnp+i 

TDA 

TDB 

HTPP ♦ 2 

untT 

TDX 
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MTCDOCOHP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0310 

225ft2 

000005 


SGL 


0311 

22543 

0 

35 

23556 


LDY 

*6 

0312 

22544 

0 

02 

00367 


IDA 

MTMP+1 

0313 

22545 

140407 


TCA 


031ft 

22546 

0 

04 

00367 


STA 

HTMP+1 

0315 

22543 

0 

02 

00370 


LDA 

MTHP+2 

0316 

22550 

140407 


TCA 


0313 

22551 

0 

04 

00370 


STA 

HTMP+2 

0310 

22552 

0 

10 

22262 


JST 

HOLT 

0310 

22553 

0 

04 

00 374 


DST 

TDY 

032" 

22554 

0 

01 

23454 


.IMP 

OOTD 

0 3 21 

22655 

0 

10 

22346 

EPL 

JST 

XNFL 

0322 

22556 

0 

35 

23555 


LDY 

= 14 

0323 

22553 

0 

02 

22131 


LDA 

TDF 

032ft 

22560 

140407 


TCA 


0325 

22561 

0 

04 

00366 


STA 

MTMP 

0326 

22562 

0 

02 

2212ft 


LDA 

TDA 

03 23 

22563 

0 

06 

22125 


ADD 

TBB 

03 20 

22564 

0 

04 

00367 


STA 

HTHP+1 

0329 

22565 

0 

02 

22127 


LDA 

TDD 

0330 

22566 

0 

07 

22126 


SOB 

TDC 

0331 

22563 

0 

04 

00 370 


STA 

MTMP * 2 

03 32 

22570 

0 

10 

22262 


JST 

MTTIT 

03 3 3 

22571 

0 

04 

00 374 


DST 

TDY 

03 3ft 

22572 

000005 


SGL 


0335 

22673 

0 

35 

23556 


LDY 

= 6 

0336 

22574 

0 

0? 

22131 


LDA 

TDF 

0333 

22575 

0 

04 

00366 


STA 

MTMP 

rms 

22576 

0 

10 

222 62 


JST 

HTTI.T 

0330 

22577 

0 

04 

00376 


DST 

TDY 

03UO 

22600 

0 

01 

23454 


JHP 

OOTD 

03U1 

22601 

0 

10 

22346 

FFL 

JST 

XNFL 

03ft2 

22602 

0 

35 

23556 


7.DX 

= 6 

03U 3 

22603 

0 

02 

22130 


1. DA 

TDE 

03ftft 

22604 

0 

04 

00366 


STA 

MTMP 

0 3ft 5 

22605 

0 

02 

22124 


T.DA 

TDA 

0346 

22606 

0 

06 

22125 


ADD 

TDB 

0343 

22607 

0 

04 

00367 


STA 

MTMP* 1 

0340 

22610 

0 

02 

22126 


LDA 

TDC 

0340 

22611 

0 

07 

22127 


SOB 

TDD 

0360 

22612 

0 

04 

00 370 


STA 

HTMP+2 

0351 

22613 

0 

10 

22262 


JST 

HOLT 

0352 

22614 

0 

04 

00 376 


DST 

TDY 

0353 

22615 

000005 


SGL 


0354 

22616 

0 

35 

23555 


LDY 

= 14 

0355 

22617 

0 

02 

00367 


LDA 

HTWP+1 

0356 

22620 

140407 


TCA 


0 3 57 

22621 

0 

Oft 

00367 


STA 

MTMP+1 

03 50 

22622 

0 

02 

00 370 


LD]l 

HTMP+2 

0350 

22623 

140407 


TCA 


0360 

22624 

0 

Oft 

00370 


STA 

HTMP+2 

0361 

22625 

0 

10 

22262 


JST 

HTTIT 

0362 

22626 

0 

04 

0037ft 


DST 

TDY 

0363 

22627 

0 

01 

23454 


JHP 

OOTD 

036ft 

22630 

0 

10 

22364 

ABFL 

JST 

YNFL 

0365 

22631 

0 

35 

23554 


IDY 

= 22 

0366 

22632 

0 

02 

22126 


LDA 

TDC 
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HICPOCOHP TELECOHHON IC AT ED DATE 



DDF- 

516 ASSEHB1T 

LISTING 


0367 

22633 

0 06 22127 


ADD 

TDD 

0368 

22634 

140407 


TC A 


0369 

22635 

0 04 00366 


STA 

HTHP 

0370 

22636 

0 10 22262 


JST 

HOLT 

0171 

22637 

0 04 00 372 


DST 

TDT 

0372 

22640 

000005 


SGL 


0373 

22641 

0 35 23553 


IDT 

= 26 

0374 

22642 

0 02 22130 


LDA 

TDE 

0376 

22643 

0 06 22131 


ADD 

TDF 

0176 

22644 

0 04 00366 


STA 

HTHP 

0777 

22645 

0 10 22262 


JST 

HOLT 

0379 

22646 

0 04 00376 


DST 

TDZ 

0379 

22647 

0 01 23454 


JHP 

OOTD 

0380 

22650 

0 35 23552 

AC FT- 

IDT 

=40 

0781 

22651 

ft 02 22125 


LDA 

TDB 

0382 

22652 

1 40407 


TCA 


0.3 8 3 

22653 

0 04 00366 


STA 

MT«P 

0384 

22654 

0 02 22127 


LDA 

TDD 

0386 

22655 

0 04 00367 


STA 

HTHP+1 

0386 

22656 

0 02 22130 


LDA 

TDE 

0387 

22657 

0 04 00370 


STA 

HTMP+2 

0389 

22660 

0 02 22131 


LDA 

TDF 

0799 

22661 

140407 


TCA 


0790 

22662 

0 04 00371 


STA 

HTHP+3 

0391 

22663 

0 10 22262 


JST 

HOLT 

0392 

22664 

0 04 00374 


DST 

TDT 

039 3 

22665 

000005 


SGL 


0394 

22666 

0 35 23551 


LDX 

= 30 

0395 

22667 

0 02 22127 


LDA 

TDD 

0396 

22670 

140407 


TCA 


0397 

22671 

0 04 00367 


STA 

HTHP+1 

0399 

22672 

0 10 22262 


JST 

HOLT 

0399 

22673 

0 04 00372 


DST 

TDT 

0400 

22674 

000005 


SGL 


0401 

22675 

0 35 23550 


LDT 

=50 

0 407 

22676 

0 02 22125 


LDA 

TDB 

0 403 

22677 

0 04 00366 


STA 

HTHP 

0404 

22700 

0 02 22131 


LDA 

TDF 

0405 

22701 

0 04 00371 


STA 

HTHP+3 

0406 

22702 

0 10 22262 


JST 

HOLT 

0407 

22703 

0 04 00376 


DST 

TDE 

0 40 9 

22704 

0 01 23454 


JHP 

onTD 

0409 

22705 

0 35 23551 

ADEL 

LDT 

= 30 

0410 

22706 

0 02 22125 


LDA 

TDB 

0411 

22707 

140407 


TCA 


0412 

22710 

0 04 00366 


STA 

HTHP 

0413 

22711 

0 02 22126 


LDA 

TDC 

0414 

22712 

140407 


TCA 


0415 

22713 

0 04 00367 


STA 

HTHP+1 

0416 

22714 

0 02 22130 


LDA 

TDE 

04 17 

22715 

140407 


TCA 


0419 

22716 

0 04 00371 


STA 

HTHP+3 

0419 

22717 

0 02 22131 


LDA 

TDF 

04 20 

22720 

0 04 00370 


STA 

HTHP+2 

0421 

22721 

0 10 22262 


JST 

HOLT 

0422 

22722 

0 04 00372 


DST 

TDT 

0423 

22723 

000005 


SGL 
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HTCPOCOMP TELECOMMUNICATED DATA 


DDP-516 assembly listing 


0424 22724 

0 35 23550 

LOT 

=50 

0425 227?* 

0 02 22125 

LDA 

TDB 

0426 22726 

0 04 00366 

STA 

KTHP 

0427 22727 

0 02 22130 

LDA 

TDE 

042* 22730 

0 04 00371 

STA 

WTMP+3 

0429 22731 

0 10 22262 

ilST 

MOLT 

0430 22732 

0 04 00376 

0 ST 

TDY 

0431 22733 

000005 

SGL 


0432 22734 

0 35 23552 

LDX 

=40 

0433 22735 

0 02 22131 

LDA 

TDF 

0434 22736 

140407 

TCA 


0435 22737 

0 04 00370 

STA 

MTWP+2 

0436 22740 

0 10 22262 

JST 

MOLT 

0437 22741 

0 04 00374 

DST 

TDY 

0438 22742 

0 01 23454 

JMP 

OTTTD 

0439 22743 

0 35 23552 

A EFT LDX 

= 40 

0440 22744 

0 02 22131 

LDA 

TDF 

0441 22746 

0 04 00366 

STA 

KTMP 

0442 22746 

0 02 22125 

LDA 

TDB 

0443 22747 

140407 

TCA 


0444 22750 

0 04 00367 

STA 

HTHP+1 

0445 22751 

0 02 22126 

LDA 

TDC 

0446 22752 

140407 

TCA 


0447 22753 

0 04 00370 

STA 

MTWP+2 

0448 22754 

0 02 22127 

IDA 

TDD 

044* 22755 

140407 

TCA 


0450 22756 

0 04 00371 

STA 

WT«P*3 

0451 22757 

0 10 22262 

JST 

MOLT 

0452 22760 

0 04 00372 

DST 

TDX 

0453 22761 

000005 

SGL 


0454 22762 

0 35 23551 

LDX 

= 30 

0455 22^63 

0 02 22125 

LDA 

TDB 

0456 22764 

0 04 00367 

STA 

MTMP+1 

0457 22765 

0 10 22262 

JST 

MOLT 

0458 22766 

0 04 00376 

DST 

TDY 

0450 22767 

000005 

SGL 


0460 22770 

0 35 23550 

LDX 

=50 

0461 22771 

0 02 22131 

LDA 

TDF 

0462 22772 

140407 

TCA 


0463 22773 

0 04 00366 

STA 

MTMP 

0464 22774 

0 02 22127 

IDA 

TDD 

046* 22775 

0 04 00371 

STA 

NTMP+3 

0466 22776 

0 10 22262 

JST 

MULT 

0467 22777 

0 04 00374 

DST 

TDY 

0468 


OBG 

*23000 

0460 


SETB 

BAS2 

0470 23000 

0 01 23454 

JMP 

OUTD 

0471 23001 

0 35 23551 

AFFL LDX 

= 30 

0472 23002 

0 02 22130 

IDA 

TDE 

0473 23003 

0 04 00366 

STA 

MTMP 

0474 23004 

0 02 22125 

LDA 

TDB 

0475 23005 

0 04 00367 

STA 

HTHP+1 

0476 23006 

0 02 22127 

LDA 

TDD 

0477 23007 

140407 

TCA 


0478 23010 

0 04 00370 

STA 

HTWP+2 

0478 23011 

0 02 22126 

LDA 

TDC 

0480 23012 

140407 

TCA 



54 



Htr^oro^p TFT p CO"! P OFTC AT P D DATA 



0D n ' 

-5 16 

AS: 

5 EFFIY 

T T STT*JO 


0481 

23019 

0 

04 

00371 

STA 

MTNP+ 3 

048? 

2 3014 

0 

10 

22262 

JST 

*17! T 

our3 

2 3015 

0 

04 

00976 

n ST 

TDZ 

0 4 R 4 

230 15 

000005 

SOT 


0 485 

2301 •» 

0 

35 

23*52 

ID Y 

=4 0 ' 

0 4 R 6 

23020 

0 

0? 

22196 

T OP 

TOP 

04R7 

23021 

1 40407 

TCP 


A 4 R R 

2302? 

0 

04 

00167 

STA 

MT M P + 1 

0 480 

23021 

0 

10 

2226? 

JS" 

flTTT T 

0400 

23024 

0 

04 

00172 

ns" 

T DX 

0401 

23025 

000005 

SOT. 


040? 

2 3026 

0 

35 

23550 

T DT 

= 50 

040? 

2 3027 

0 

02 

22127 

i.OP 

TDD 

04°4 

23030 

n 

04 

QO 370 

STA 

PTWP+2 

040^ 

23091 

0 

10 

22262 

JST 

PUT T 

0 4 °6 

2303? 

0 

04 

oo 374 

OS'" 

TOY 

040? 

23013 

0 

01 

29454 

IMP 

OHTD 

049 p 

2 3034 

0 

35 

23551 

PC FT T Dx 

= 70 

0400 

23035 

0 

02 

22124 

T OR 

TDP 

Q 500 

23036 

0 

04 

00 366 

6TA 

PTPP 

OROI 

23037 

0 

09 

22127 

IDA 

TOO 

0 60? 

23040 

140407 

*CA 


0501 

2304 1 

0 

04 

00967 

STA 

5TPP+1 

n6oa 

2304? 

0 

09 

29131 

T DA 

p 

o*o c 

23049 

140407 

t>ca 


0 50 6 

23044 

0 

04 

00 370 

ST A 

PTHP+? 

050^ 

23046 

0 

02 

221 70 

I DA 

TOP 

050R 

2 3 046 

0 

04 

00371 

ST A 

PTPP+3 

o c oo 

2 304-t 

0 

in 

2226? 

JS rf ' 

*nT x 

0510 

2 3050 

0 

04 

00372 

DST 

TDX 

0 e 1 1 

23051 

000005 

SOT 


nsi 2 

23052 

0 

35 

23552 

t T)X 

= 40 

0519 

23053 

0 

02 

22127 

T DA 

TOD 

0814 

23054 

0 

04 

00367 

ST. A 

MTUP+ 1 

051 5 

23055 

0 

10 

2226? 

.1ST 

PUT T 

nc i f 

23056 

0 

04 

00774 

AST 

TDY 

0 c 1 7 

2305T 

000005 

SOT 


0 51 R 

23060 

0 

35 

23550 

I DX 

= 50 

0519 

23061 

0 

02 

22131 

T DA 

TOP 

0520 

2 3 0 6? 

0 

04 

00 770 

STA 

*T *P 4 -? 

n 5 2 1 

23067 

0 

1 n 

2226? 

JST 

s^rtt x 

05?'> 

23064 

0 

04 

00776 

DST 

T07 

0 c 2 2 

23065 

0 

01 

23454 

J HP 

OUTD 

0 5 24 

2 3066 

p 

95 

23561 

PDDl T. DX 

= 70 

0 C 2 C 

23067 

0 

02 

22124 

T r>A 

TOA 

0 526 

23070 

0 

04 

00366 

STA 

PTPP 

0 5^7 

23071 

0 

07 

2? 1 ?6 

TOA 

TOC 

0529 

23072 

140407 

T CA 


0 5 29 

23073 

0 

04 

00367 

STA 

pi'TP+l 

0590 

2 3074 

0 

02 

221 ’0 

1 OA 

TOS 

0 5 91 

23075 

140407 

T’CA 


0532 

23076 

0 

04 

00 370 

STA 

PTPD + ? 

0 e 33 

23077 

0 

02 

22131 

IDA 

TOP 

0^34 

23100 

0 

04 

00371 

STA 

MT*P+3 

0515 

23101 

0 

10 

2226? 

.1ST 

pHT T 

05?6 

2310? 

0 

Oa 

00372 

OS' 1 ’ 

TDX 

0*37 

23103 

000005 

SOD 
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HTCBOCONP TEIECOHBIJNICATED DATA 



DDP- 

516 

ASSEHBLY 

LISTING 


05 38 

23104 

0 

35 

23550 


LDX 

“50 

0539 

23105 

0 

02 

22126 


IDA 

TDC 

0540 

23106 

0 

04 

00367 


STA 

STHP-fr 1 

0 541 

23107 

0 

02 

22130 


IDA 

TDE 

0542 

23110 

0 

04 

00 370 


ST* 

HTNP+2 

0 C 43 

23111 

0 

10 

22262 


JST 

BOLT 

0544 

23112 

n 

04 

00 376 


DST 

TDE 

0545 

23113 

000005 


SGI 


0545 

23114 

0 

35 

23552 


IDT 

“40 

0547 

23115 

0 

02 

22124 


IDA 

TDA 

0 C 48 

23116 

140407 


▼CA 


0549 

23117 

0 

04 

00366 


STA 

BTBP 

0550 

23120 

0 

02 

22126 


IDA 

TDC 

0551 

23121 

140407 


TCA 


0552 

23122 

0 

04 

00367 


ST* 

BTBP+1 

0553 

23123 

0 

02 

22131 


IDA 

TDP 

0554 

23124 

140407 


TCA 


0555 

23125 

0 

04 

00371 


BTA 

WTBP+3 

0556 

23126 

0 

10 

22262 


JST 

HUIT 

0 557 

2 3127 

0 

04 

00374 


DST 

TDY 

0558 

23130 

0 

01 

23454 


JNP 

07TD 

0559 

23131 

0 

35 

23552 

BEFI 

7DX 

=4 0 

0560 

23132 

0 

02 

22131 


IDA 

TDF 

0561 

23133 

140407 


TCA 


0562 

23134 

0 

04 

00366 


STA 

BTBP 

0563 

23135 

0 

02 

22124 


IDA 

TDA 

0564 

23136 

0 

04 

00367 


STA 

BTBP+1 

0565 

23137 

0 

02 

22127 


IDA 

TDD 

0566 

23140 

140407 


TCA 


0567 

23141 

0 

04 

00370 


STA 

BTBP+2 

0568 

23142 

0 

02 

22126 


IDA 

TDC 

0569 

23143 

140407 


TCA 


0570 

23144 

0 

04 

00371 


STA 

WTWP+3 

0571 

23145 

0 

10 

22262 


.1ST 

BUT.T 

0572 

23146 

0 

04 

00 372 


DST 

TDT 

0 573 

23^47 

000005 


SGI 


0574 

23150 

A 

VI 

35 

23550 


IDT 

=50 

0575 

23151 

0 

02 

22127 


IDA 

TDD 

0576 

2316? 

0 

04 

00370 


STA 

BTHP+2 

0577 

23153 

0 

10 

22262 


1ST 

BTTTT 

057R 

23154 

0 

04 

00374 


DST 

TDY 

0579 

23155 

000005 


SGI 


0580 

23156 

0 

35 

23551 


IDT 

= 30 

0581 

23157 

0 

02 

22131 


T.DA 

TDF 

0582 

23160 

0 

04 

00366 


STA 

BTBP 

0583 

23161 

0 

02 

22126 


IDA 

TDC 

0584 

23162 

0 

04 

00371 


STA 

BTBP+3 

0585 

23163 

0 

10 

22262 


JST 

NOT T 

0586 

23164 

0 

04 

00 376 


DST 

TD7 

0 587 

23165 

0 

01 

23454 


JHP k 

OTJTD 

0588 

23166 

0 

35 

23552 

BFFL 

IDT 

=40 

0 589 

23167 

0 

02 

22130 


IDA 

TDE 

0590 

23170 

140407 


TCA 


0591 

23171 

0 

04 

00366 


STA 

BTBP 

0592 

23172 

0 

02 

22124 


IDA 

TDA 

0593 

23173 

0 

04 

00367 


STA 

BTBP+1 

0594 

23174 

0 

02 

22126 


IDA 

TDC 
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rrrcT?oeoMT> tfifcof font cat fd da^a 
ppp-si* assemfty ttsttfg 


0595 

23175 

1 40407 


TCA 


0595 

23175 

0 04 00370 


STA 

FTFP+2 

n c 97 

73177 

0 0? 22127 


LDA 

TP P 

059R 

23700 

140407 


TCA 


f)599 

23201 

0 04 00371 


ST A 

H T F p ♦ 3 

0500 

2 3707 

0 10 22252 


JST 

HOT T 

050 1 

73703 

0 04 00372 


PST 

TOY 

0502 

23704 , 

000005 


SGP 


0509 

23705 

0 35 23550 


LOT 

=50 

0604 

23705 

0 02 22130 


T.n* 

TPF 

0505 

23707 

0 04 00365 


C TA 

FT*P 

0505 

73710 

0 02 72124 


T DA 

TP A 

0609 

2321 1 

140407 


TCA 


0 5 0 5 

23712 

0 04 00357 


ST A 

M'T' wp+ 1 

0509 

23213 

0 0? 77177 


T on 

TDD 

05 10 

23714 

0 04 00371 


STA 

MTMp+3 

051 1 

73215 

0 10 22252 


.1 ST 

HTJJ,T 

0517 

2 3715 

0 04 00374 


nsr 

Tpv 

0 51 1 

23217 

000005 


SGt 


05 iii 

23720 

0 35 79651 


! PY 

= 90 

0515 

2 3221 

0 02 22124 


T. PA 

tpa 

0515 

7 3279 

0 04 00367 


STA 

FTHP + 1 

05 V 7 

23273 

0 02 22125 


T PA 

Tnr 

0519 

23224 

0 04 00970 


5TA 


0510 

2 3725 

0 10 22257 


JST 

MHT.T 

0579 

23225 

0 04 00 975 


PST 

TP7 

0571 

7 3777 

0 01 23454 


JMP 


0572 

23730 

0 10 22401 

CDFT. 

JST 

TUFT, 

0577 

2 7 231 

0 35 23559 


t r>v 

= 26 

0574 

2 32 37 

0 07 ??124 


T PA 

TP A 

0575 

27239 

0 Q9 72125 


SDR 

T PP 

0525 

23 2 9 4 

0 04 00965 


S^is 

FT FP 

06?7 

2 32 35 

0 10 27752 


JST 

HPT T 

0570 

23235 

0 04 00377 


PST 

Tpy 

0 570 

27737 

000005 


SGT. 


05 30 

73240 

0 35 23654 


I PY 

= 22 

05 31 

23241 

0 07 22130 


T PA 

m DF 

0697 

23247 

0 07 22131 


SUF 

TPF 

06 3 9 

23243 

0 04 00356 


STA 

FT HP 

05 94 

23744 

0 10 22262 


JST 

HPT T 

05 95 

23745 

0 04 00374 


PST 

TDY 

0 5 9£, 

2 3245 

0 01 23454 


J WP 

onTp 

0 5 9^ 

7 37 4 9 

9 35 79550 

rpFI 

I, DY 

= 50 

0* 39 

77750 

0 0? 22127 


r pn 

TPP 

05 39 

73751 

1 40407 


TCA 


0540 

23759 

0 04 00366 


ST A 

FTFP 

0541 

23259 

0 07 22131 


PDA 

TPF 

0 5 4 7 

23254 

1 4 OUO 7 


TCA 


0549 

2 3 755 

0 04 00767 


ST A 

FTMp+1 

05 4 4 

2 3755 

0 02 22124 


IDA 

TP * 

05 4 5 

23259 

0 04 00370 


ST A 

NTFP ♦ 2 

0545 

23260 

0 02 22125 


1 . D A 

TDB 

0547 

23251 

140407 


TCA 


0549 

23257 

0 04 00371 


ST A 

m-TFP+3 

0549 

23253 

0 10 22262 


JST 

FPT.T 

0550 

23254 

0 04 00372 


PST 

TP Y 

0551 

23265 

000005 


SGT. 
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HTr'»PCr>*1P TET.BCOIMTKTCM'BD DA^R 


DnP-516 ASSEMBLY LISTING 


Of 6> 

23266 

0 

7 5 

27551 


TOY 

*30 

0f57 

23267 

0 

07 

22127 


T DR 

TDD 

Of 64 

23770 

0 

04 

00366 


ETA 

HTMP 

Off 5 

23771 

0 

02 

22125 


T.DA 

TDD 

Of ff 

2 3777 

0 

04 

00371 


ETR 

WT5P+3 

Off T 

21273 

0 

10 

22?f 2 


JST 

MOLT 

Of 69 

2 3774 

0 

04 

00774 


dst 

TDT 

Of f O 

23279 

000005 


SGL 


Of f 0 

23276 

0 

35 

23552 


LDX 

-4 0 

Off 1 

2377"» 

0 

0? 

22131 


TDA 

TDF 

Off 

23300 

0 

04 

00367 


STA 

MTMP+1 

Of f 1 

2 3701 

0 

1ft 

22 2f 2 


.1ST 

Mill T 

Of f 4 

2 7 30? 

0 

04 

00 37f 


DST 

TDE 

Of f f 

? 3 307 

0 

01 

23454 


.IMP 

OOTD 

Of f f 

27304 

0 

35 

23551 

CFfL 

LDX 

*30 

Of f ^ 

27709 

0 

02 

22127 


T DR 

TDD 

Of f 9 

23706 

0 

04 

00 Iff 


ETR. 

MTMP 

Of f o 

27307 

0 

07 

22130 


T DR 

TDF 

Of 7 0 

? 3710 

0 

04 

003fi7 


ETA 

MTMPH 

Of 7 1 

2 7 3 1 1 

0 

0? 

22125 


T DR 

T'DP 

Of 7 -* 

? 7 7 1 7 

140407 


TCR 


Of 7 7 

23713 

0 

04 

00 370 


ETR 

MTMP*2 

Of 7 n 

2 3 31 4 

0 

02 

22124 


T.DA 

TDA 

Of^f 

?7 3 If 

140407 


T CA 


Of 7 f 

27316 

0 

04 

00371 


ETR 

MT^P* 3 

Of7f 

27717 

0 

10 

22262 


JST 

MOLT 

Of 7p 

2 3 7? n 

0 

04 

0 0 3 7t| 


DST 

TDY 

Of 7 Q 

23771 

000005 


SGI 


Of 9 0 

23322 

0 

35 

23650 


IDT 

*6(1 

Of 9^ 

23 323 

0 

02 

22127 


T.DR 

TDD 

Of R7 

23324 

1 40407 


TCR 


Of 87 

2332* 

0 

04 

00 366 


ETR 

MTMP 

Of QU 

2 3 72f 

0 

02 

22124 


T.DR 

TDR 

0*95 

23727 

0 

04 

00 371 


STA 

MTMP+3 

Of Pf 

23370 

0 

10 

22262 


JST 

KfTLT 

Of 0*1 

2373 1 

0 

04 

00372 


DST 

TDX 

Of 09 

23332 

0000^5 


SGL 


Of 9° 

23333 

0 

35 

23552 


LDX 

= 40 

Of 90 

23334 

0 

02 

22125 


TDA 

TDB 

Of Pi 

23335 

0 

04 

00370 


ETA 

MTMP+2 

Of 97 

2333f 

0 

10 

22262 


JST 

MOLT 

n f ao 

23337 

0 

04 

00376 


DST 

TDE 

Of ou 

23340 

0 

01 

23454 


JWP 

OOTD 

OfOE 

23341 

0 

35 

23550 

DEFT. 

T. DX 

=50 

Of Of 

2334? 

0 

02 

22126 


tDA 

TDC 

Of 07 

23347 

140407 


TCA 


Of 90 

23344 

0 

04 

00366 


C TA 

MTMP 

Of 09 

23345 

0 

02 

22131 


T DR 

TDF 

07 Q 0 

23346 

0 

04 

00367 


ETA 

MTWP+I 


23347 

0 

02 

22125 


IDA 

TDB 

070 2 

23750 

140407 


TCA 


0703 

23391 

0 

04 

00 370 


ETR 

MTMP+2 

0704 

23392 

0 

0? 

22124 


IDA 

TDA 

070E 

23753 

0 

04 

00371 


ETA 

MTMP+3 

0 70 f 

23354 

0 

10 

22262 


JST 

Mni.T 

0707 

27755 

0 

04 

00 372 


DST 

TDX 

0709 

2 335f 

000005 


SGL 
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HTCsoro M P tft ^ coiiwrcfr^n oats 



OOP- 

516 ASSBflPLY itsttkg 


070° 

23357 

0 35 23552 

LDX 

= 40 

07 in 

27760 

0 0? 22125 

T DA 

TDD 

0711 

2 3 36 1 

0 04 00370 

ST" 

YTYP + 2 

0717 

23762 

0 10 22262 

TS 1 * 

flPT T 

0711 

23767 

0 04 00376 

OS'” 

TO? 

07 14 

27764 

000005 

*GL 


07 1 * 

2 3 76* 

n 15 23551 

T.DX 

- 30 

07i* 

77766 

n 02 22131 

T D A 

TDF 

07 1 7 

? 7767 

140407 

TOA 


0710 

23770 

0 04 00767 

STA 

"IT YP + 1 

onn 

23771 

0 10 2226? 

7S T 

MOLT 

0720 

7377? 

0 04 00374 

PST 

T0V 

0721 

23377 

(1 01 2 7 U 5 4 

JY" 

optd 

072? 

2 47 74 

0 35 23550 FFFT, 

ID y 

= 50 

07? i 

2747* 

0 07 22126 

T PA 


07?') 

27376 

140407 

m f A 


07?* 

2 3 47 7 

0 04 00366 

C TA 

MT-p 

n7?£ 

23400 

0 0? 22 1 70 

» PA 

TpF 

0727 

2 3 401 

140407 

TCA 


0770 

23407 

0 04 00767 

STA 

Kj<rMp + 1 

07?o 

23403 

0 07 22124 

T DA 

TDA 

Q770 

2 3 4 0 4 

0 04 00^70 

ST A 

M-pMp+O 

07 71 

2 74 0* 

0 0? 2?1?* 

T DA 

TPR 

07 1? 

27406 

1 40407 

TC! A. 


0 7 7 "* 

2340? 

0 04 00 3’ T 1 

STA 

Y T Y P + 7 

077 4 

23410 

0 in 2226? 

OS? 

MPT T 

071* 

2 3 4 1 1 

0 04 00772 

OST 

Tpy 

077f 

234 12 

000 0 n 5 

OPT. 


0 7 ? ^ 

2341 3 

0 7* 235*1 

T D7 

= 30 

071fl 

2 44 14 

0 02 22170 

T DA 

■^PF 

0730 

234 1* 

0 04 00767 

ST A 

y m wD+ 1 

0740 

23416 

0 02 22124 

T PA 

TT1 B 

0741 

23417 

1 40407 

"CA 


074? 

23420 

0 04 00770 

STA 

turn HJ p + 2 

0747 

2 34 21 

0 10 2226? 

.7 ST 

YPT. T 

0 7 4 U 

2 34?? 

0 04 00374 

PST 

TD v 

074* 

23423 

000005 

SOT, 


0746 

2 34 24 

0 35 23552 

T PY 

= 40 

0747 

2 74 25 

0 02 22126 

T DA 

TDO 

074 n 

23426 

0 04 00366 

sta 

IT YP 

0 74 0 

2 3477 

0 02 22124 

1 DA 

TpA 

0750 

23430 

0 04 00370 

*TA 

Y t Y P * ? 

07*1 

23431 

0 0? 22125 

I. DA 

TDB 

075? 

23432 

0 04 00371 

5TA 

YTYP+3 

07*7 

23433 

0 10 22262 

,7 ST 

YTTT T 

0751) 

23434 

0 04 00776 

D ST 

TD 7 

07 55 

2 3436 

o 01 23454 

JKP 

0 PTD 

0756 

23436 

0 10 22346 F^PL 

7 ST 

YNT7L 

07*7 

23437 

0 35 23553 

T, D7 

= ?6 

075* 

23440 

0 02 22127 

T DA 

TDD 

07*o 

23441 

0 07 22126 

* P B 

tdt 

0760 

27442 

0 04 00366 

STA 

MTMp 

0761 

23443 

0 10 22262 

JST 

YTTT T 

076? 

23444 

0 04 00374 

PST 

TD Y 

0767 

23445 

000005 

SOT, 


0764 

23446 

n 3* 23554 

TOY 

= 22 

07ft* 

2 3447 

0 02 22124 

PDA 

TD A 
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NTCFOCONP TBLFCOHHONICAT ED DAT A 



DDP- 

516 ASSEMBLY 

LISTING 


0766 

23950 

0 06 22125 


MID 

TDB 

0767 

23851 

0 04 00366 


STA 

HTNP 

0?68 

2345? 

0 10 22262 


JST 

HOLT 

076 Q 

23453 

0 04 00376 


DST 

TDZ 

0770 

23459 

0 02 22132 

ONTO 

OLD 

INST 

0771 

23455 

101040 


SNZ 


077? 

23456 

0 01 23506 


JHP 

PIPS 

0773 

23457 

0 02 23522 


DLP 

DBPO 

077 0 

23460 

0 07 00372 


DSB 

TDY 

0775 

23461 

0401 76 


LFS 

2 

0776 

23462 

0 06 00372 


DUD 

TDY 

0777 

23463 

0 06 00372 


DAD 

TDY 

0770 

23864 

0 06 00414 


DAD 

•414 

0770 

23465 

0 04 00414 


OST 

• 414 

0700 

23466 

0 02 23522 


OLD 

DBPO 

0781 

23467 

0 07 00374 


DSB 

TDY 

0^82 

23470 

0401 76 


LFS 

2 

078? 

23471 

0 06 00374 


DAD 

TDY 

078U 

2347? 

0 06 00374 


DAD 

tdy 

0785 

23473 

0 06 00416 


DAD 

•416 

0786 

23474 

0 04 00416 


DST 

•416 

0787 

23475 

0 02 23522 


DID 

DBPO 

0788 

23476 

0 07 00376 


DSB 

TDZ 

0780 

23477 

0401 76 


LFS 

2 

0790 

23500 

0 06 00376 


DAD 

TDZ 

0791 

23501 

0 06 00376 


DAD 

TDZ 

079? 

23502 

0 06 00420 


DAD 

•420 

0 7 93 

23503 

0 04 00420 


DST 

•420 

0799 

23504 

000005 


SGL 


0795 

23505 

-0 01 22053 


JHP* 

GYPF 

0796 

23506 

0 02 00372 

PIPS 

DID 

TDY 

0797 

23507 

0 06 00614 


DAD 

•614 

0798 

23510 

0 04 00614 


DST 

* 614 

0799 

23511 

0 02 00374 


DLD 

TDY 

0900 

23512 

0 06 00616 


DAD 

•616 

0801 

23513 

0 04 00616 


DST 

•616 

0802 

23514 

0 02 00376 


DLD 

TDZ 

080? 

23515 

0 06 00620 


DAD 

*620 

0809 

23616 

0 04 00620 


DST 

•620 

0805 

23517 

000005 


SGL 


O«06 

23520 

-0 01 22024 


JHP* 

PIPF 

0807 

2352? 

oooooo 

DBPO 

DBP 

0 


23523 

000000 




0908 

23524 


BAS2 

BSS 

20 

0809 

23550 

000062 


PND 



23551 

000036 





23552 

000050 





23553 

000032 





23554 

000026 





23555 

000016 


* 



23656 

000006 





23657 

000013 
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PROGRAM NAME: 

SOURCE: ALUP 
BINARY: BALUP 

ENTRY POINTS (LOCATION): This is the main program and starts in '1000. 
GENERAL DESCRIPTION: 

This program controls all the timing, moding and subroutine calls 
that make the system work. The timing diagram shows what is done as a 
function of real time (t). T, T^. and T are incremented by .02 after each 
gyro update (G). T^ times the fine align or navigation and is zeroed every 
second. T q times the teletype output and is zeroed every two minutes. T 
simply counts time. The three functional diagrams ( P, G and F) show the 
details of what are represented on the t line of the timing diagram as P, G 
and F. The statistical failure detection, isolation , classification and re- 
certification programs are called every two minutes immediately prior to 
the output call and use the two minutes of data which are saved for them as 
shown in F. 
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03 

to 


1 

0 

1 

\ 

.02 

1 

• 04 i 

1 

0 

.02 

l 

.04 

p F G, 

F P F G 

■ C<\ V 1 

l 

F P F 

■ \ 

0 .01 

.02 .03 

.04 .05 

.06 


INITIALIZE GYRO COUNTERS 
& ENABLE INTERRUPT 


INITIALIZE ACCELEROMETER COUNTERS 



TIMING DIAGRAM 



p 



save registers in register set 1 
read accelerometers 
do accelerometer compensation 
do bias recompensation 
do RW^, RW compensation 
do accelerometer pulse accumulation 
do accelerometer deterministic FDI 
do accelerometer 6x3 multiply 
do quaternion normalization 
do velocity algorithm 
do XAVX, LAV Y, D4VZ 


FUNCTIONAL DIAGRAM P 
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save registers in register set 1 
read table encoder 
read gyros 

do gyro compensation 
do statistical ramp compensation 
do statistical bias compensation 
do gyro deterministic FDI 
do gyro 6x3 multiply 


T<60 


t 


|T<260 

do coarse align 
£4V filter 

I 

do attitude 
algorithm 


v T>60 
T - 260 
£dV=o 

l 

set coarse align 
finish bit 

I 

do coarse align 


J T >260 

do inertial rate 
compensation 


do attitude 
algorithm 


azimut 

p 

:h calc. 






T 

T n 

T 0 


= T + .02 
= T n + .02 
= T o +.02 


FUNCTIONAL DIAGRAM G 


T = 60 


do coarse align 
level calc. 
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t 


h- 

.02 





FUNCTIONAL DIAGRAM F 
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MIC*OCOW? TEI-EC01H0NICATED DATA 



dop- 

516 

ASSEMBLY 

LISTING 


0001 





REL 


0002 





SO BR 

MODE 

0003 





SETB 

BASE 

0 004 

00000 

000007 

DBL 


0005 

00001 

0 

02 

00216 

DID 

D7R0 

0006 

00002 

0 

35 

00777 

LDX 

=-68 

0007 

00003 

1 

04 

00422 

D ST 

•422,1 

00 OB 

00004 

o 

12 

00000 

IRS 

0 

000° 

00005 

0 

12 

ooooo 

IRS 

0 

0010 

00006 

0 

01 

00003 

JMP 

*- 3 

0011 

00007 

0 

35 

00776 

LDX 

= -40 

0012 

00010 

1 

04 

00500 

DST 

•500, 1 

0013 

00011 

0 

12 

OOOOO 

IRS 

0 

0014 

00012 

0 

12 

OOOOO 

IRS 

0 

0010 

00013 

0 

01 

00010 

JMP 

*-3 

001* 

00014 

0 

35 

00777 

LDX 

= -68 

0017 

00015 

1 

04 

00700 

DST 

•700,1 

0 010 

00016 

0 

12 

OOOOO 

IRS 

0 

0010 

00017 

0 

12 

OOOOO 

IRS 

0 

0070 

00020 

0 

01 

00015 

JMP 

*- 3 

0021 

00021 

-0 

04 

00177 

DST* 

PAO A 

0072 

00022 

-0 

04 

00200 

DST* 

P AO B 

0 02 3 

00023 

-0 

04 

00201 

DST* 

PA OC 

0024 

00024 

-0 

04 

00202 

DST* 

PAOD 

no? c 

00025 

-0 

04 

00203 

DST* 

PACE 

0 026 

00026 

-0 

04 

00204 

DST* 

P AO F 

002*1 

00027 

0 

02 

00224 

DLD 

NOUP 

002* 

00030 

0 

04 

00772 

DST 

♦772 

002 Q 

00031 

0 

02 

00222 

DLD 

POOP 

0030 

00^32 

0 

04 

0077Q 

DST 

•770 

0031 

00033 

000005 

SGL 


0037 

00034 

0 

02 

00775 

T DA 

=• 40000 

0 0 3* 

00035 

0 

04 

00401 

STA 

•401 

0034 

00 0 36 

0 

04 

00403 

STA 

» 403 

0030 

000.37 

0 

04 

00405 

STA 

•405 

0036 

90040 

0 

04 

00407 

STA 

• 407 

00 3 7 

00041 

0 

04 

00411 

STA 

•411 

0033 

00042 

r\ 

V 

04 

00413 

STA 

• 413 

0039 

00043 

0 

04 

00601 

STA 

•601 

0040 

00044 

0 

04 

00603 

STA 

•603 

ooui 

00045 

0 

04 

00605 

STA 

•605 

0042 

00046 

0 

04 

00607 

STA 

•607 

004* 

00047 

0 

04 

00611 

STA 

•611 

0044 

00050 

0 

04 

00613 

STA 

• 613 

004* 

00051 

0 

04 

00415 

STA 

•415 

0046 

00052 

0 

04 

00417 

STA 

• 417 

0047 

00053 

0 

04 

00421 

STA 

*421 

004 R 

00054 

0 

04 

00615 

STA 

♦ 615 

0049 

00055 

0 

04 

00617 

STA 

•617 

006 0 

00056 

0 

04 

00621 

STA 

♦621 

0051 

00057 

0 

04 

00460 

STA 

•460 

0052 

00060 

0 

04 

00463 

STA 

• 463 

0053 

00061 

0 

04 

00467 

STA 

•467 

0054 

00062 

0 

04 

00473 

STA 

• 473 

00 55 

00063 

0 

04 

00477 

STA 

•477 

0 05 6 

00064 

0 

04 

00447 

STA 

• 447 

0057 

00065 

0 

04 

00453 

STA 

♦453 
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1TCF OCOMP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY LISTING 


0059 

00066 

0 

04 

00457 

STA 

* 457 

0 05 q 

00067 

0 

02 

00176 

LD A 

RD AD 

onfio 

00070 

0 

04 

00063 

STA 

•63 

noei 

00071 

0 

1 0 

00000 

CALL 

ICINIT 

eo6 7 

00072 

0 

0 2 

00774 

IDA 

-6 

00 f I 

00073 

74 

0020 

SMK 

r 2 0 

0064 

00074 

0 

02 

00101 

LDA 

A OUT 

0065 

00075 

0 

04 

00340 

STA 

RUPT 

0066 

00076 

000043 

INK 


006’’ 

00077 

0 

04 

00334 

STA 

KEYS 

nc6R 

00100 

0 

01 

00412 

J HP 

FAKS 

0060 

00101 

0 

000102 AOUT 

DAC 

*♦1 

0010 




* 



0071 




♦ 



0072 

00102 

000401 LOOP 

FNB 


0073 

00103 

0 

02 

00337 

LDA 

OUTB 

C07H 

00104 

101040 

SN7. 


0075 

00 1 05 

0 

01 

00103 

.JMP 

* -2 

0076 

00U16 

0 

10 

00000 

CALL 

ST FL 

0071 

0 010 7 

0 

10 

ooooo 

CALL 

PSFI 

0073 

001 10 

0 

02 

00640 

LDA 

'640 

p 070 

00111 

0 

0 4 

00270 

STA 

OTMP+ 3 0 

0030 

00112 

0 

02 

00641 

LDA 

*641 

0031 

00H3 

0 

04 

00271 

STA 

0TMP+ 3 1 

003? 

nni 14 

0 

02 

00642 

LDA 

*642 

0033 

00115 

0 

04 

00272 

STA 

OTMP+32 

oosu 

00116 

0 

02 

006 4 4 

LDA 

*644 

OOPS 

00117 

0 

04 

00273 

STA 

OTMP+33 

00R6 

00120 

0 

02 

00650 

LDA 

*650 

GOBI 

00121 

0 

04 

00274 

STA 

OTMP+34 

OOP3 

00122 

0 

02 

00651 

I DA 

*651 

OORi 

00123 

0 

04 

00275 

STA 

QTMP+35 

0090 

00124 

0 

0 2 

00652 

LDA 

*652 

0091 

00125 

0 

04 

00276 

STA 

OTMP+36 

0092 

00126 

0 

02 

00636 

LDA 

*636 

009? 

00127 

0 

04 

00277 

STA 

OTMP+37 

0094 

00130 

000007 

DBL 


0095 

00131 

- 0 

02 

00205 

OLD* 

B 

0096 

00132 

0 

04 

00300 

DST 

QTMP+38 

0097 

00 133 

'0 

02 

00206 

DLD* 

BP2 

0093 

00 13 4 

0 

04 

00302 

DST 

QTKP+40 

0079 

00135 

0 

02 

00622 

DLD 

*622 

0100 

00136 

0 

04 

00304 

DST 

QTMP+42 

0101 

00137 

0 

02 

00624 

DLD 

*624 

0102 

00140 

0 

04 

00306 

DST 

QTMP+44 

0103 

00141 

0 

02 

00626 

DLD 

*626 

0104 

00142 

0 

04 

00310 

DST 

QTflP + 46 

0105 

00143 

0 

02 

0063 0 

DLD 

*630 

01 06 

00144 

0 

04 

00 312 

DST 

OTflP + 48 

0107 

00145 

0 

02 

00632 

DLD 

* 632 

01 03 

00 146 

0 

04 

00314 

DST 

QTMP+50 

0103 

00147 

0 

02 

00634 

DLD 

* 634 

0110 

00150 

0 

04 

00316 

DST 

QTNPf 52 

Oil 1 

00151 

0 

02 

00436 

DLD 

*436 

0112 

00152 

0 

04 

00320 

DST 

OTHP+54 

0113 

00153 

0 

02 

00440 

DID 

• 440 

01 19 

00154 

0 

04 

00322 

DST 

OTflP+56 
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MTCPOCOMP TELECOMMUNICATED DATA 



DPP- 

516 ASSEMBLY 

LISTING 


01 1 5 

00 1 5 5 

0 02 00442 

DLD 

•442 

0116 

00156 

0 04 00324 

DST 

OTWP*58 

0117 

00157 

000005 

SGL 


011" 

00160 

0 10 00000 

CALL 

OUTPUT 

Oil? 

00161 

0 000232 

DAC 

QTMP 

0120 

00162 

0 000721 

DAC 

MODE 

0121 

00 163 

000000 

OCT 

0 

0122 

00164 

140040 

CPA 


012? 

00165 

0 04 00337 

STA 

OUTB 

0124 

00166 

101002 

SS4 


0125 

00167 

0 01 00102 

J HP 

LOOP 

0126 



* 


0127 



* EXIT COPING 

0120 



* 


0 1 2 d 

00 170 

14 0047 

OCP 

•47 

0130 

00171 

14 0057 

OCP 

• 57 

0131 

00172 

140040 

CPA 


013? 

00173 

74 0020 

SMK 

•20 

013? 

00 174 

001001 

INK 


01 3H 

00175 

-0 01 00367 

(IMP* 

DOS 

0130 



* 


0136 



* 


0137 



* 


013° 

00176 

0 000000 

RD AD X AC 

RUPT 

0139 

00177 

0 000000 

PA OA XAC 

AO AP 

014C 

00200 

0 000000 

PAOB XAC 

BOAP 

mm 

00201 

0 000000 

PAOC XAC 

COAP 

014? 

00202 

0 000000 

PAOD XAC 

DOAP 

014? 

0020? 

0 oooooo 

PAOE XAC 

EOAP 

0144 

00204 

0 oooooo 

PAOF XAC 

FOAP 

0 1 4 5 

00205 

o oooooo 

B XAC 

B 

0146 

00206 

o oooooo 

BP2 XAC 

BP2 

0147 

00207 

o oooooo 

VR XAC 

VR 

0 1 4 B 

00210 

0 oooooo 

VF XAC 

VE 

0140 

00211 

0 oooooo 

VN XAC 

VN 

0150 

00212 

0 oooooo 

LAMB XAC 

LAMB 

0151 

00213 

o oooooo 

OMGA XAC 

OMGA 

0 152 

00214 

o oooooo 

H XAC 

H 

0153 

00216 

oooooo 

DZRO DBP 

0 


00217 

oooooo 



0154 

00220 

oooooo 

DONE OCT 

0,2 


00221 

000002 



0155 

00222 

oooooo 

POOP OCT 

0,144 


0022? 

000144 



0156 

00224 

oooooo 

NOUP OCT 

0,27340 


00225 

027340 



0157 

00226 

oooooo 

SIXS DEC 

5998BB30 


00227 

013566 



015B 

00230 

oooooo 

D260 DEC 

26000BB30 


00231 

062620 



015° 

00232 

oooooo 

QTMP BS7, 

60 


00233 

oooooo 




00234 

oooooo 




00235 

oooooo 




00236 

oooooo 




00237 

oooooo 




00240 

oooooo 
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mcnocoMP telecommonicated oats 
t)T)P-51f» ASSEMBLY LISTING 


00241 

000000 



00242 

000000 



00243 

oooooo 



00244 

oooooo 



00245 

oooooo 



00246 

oooooo 



00247 

oooooo 



00250 

oooooo 



00251 

oooooo 



00252 

oooooo 



00 253 

oooooo 



00354 

oooooo 



00255 

oooooo 



00256 

oooooo 



00357 

oooooo 



00260 

oooooo 



00261 

oooooo 



00262 

oooooo 



00263 

oooooo 



00264 

oooooo 



00265 

oooooo 



00266 

oooooo 



00267 

oooooo 



00270 

oooooo 



00271 

oooooo 



00272 

oooooo 



00273 

oooooo 



00274 

oooooo 



00275 

oooooo 



00276 

oooooo 



00277 

oooooo 



0030 0 

oooooo 



00301 

oooooo 



00302 

oooooo 



0030? 

oooooo 



00304 

oooooo 



00 305 

oooooo 



00306 

oooooo 



00 307 

oooooo 



00310 

oooooo 



0031 1 

oooooo 



00312 

oooooo 



0031 3 

oooooo 



00314 

oooooo 



00315 

oooooo 



00316 

oooooo 



00 317 

oooooo 



00320 

oooooo 



00321 

oooooo 



00322 

oooooo 



00123 

oooooo 



0 0 324 

oooooo 



00325 

oooooo 



0160 


* 


0161 00326 

oooooo 

AREG 

OCT 

0162 00327 

oooooo 

GERA 

OCT 

0163 00330 

oooooo 

BREG 

OCT 
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^TCWOCOMP TELECOMMUNICATED DATA 



DDP- 

616 ASSEMBLY 

LISTING 


016U 

00331 

000000 

GERB 

OCT 

0 

0165 

00332 

000000 

XREG 

OCT 

0 

016 6 

00333 

000000 

GEPX 

OCT 

0 

0167 

00 334 

000000 

KEYS 

OCT 

0 

016 0 

00335 

000000 

SYEK 

OCT 

0 

0169 

00 336 

000000 

TPUR 

OCT 

0 

0170 

0 0 3 3 7 

000000 

OUT B 

OCT 

0 

0171 


000776 

TIME 

FQU 

•776 

0170 



* 



0171 




SUBB 

RUPT 

0174 




SUBR 

ASCT 

0175 




BEL 


0176 

00340 

0 000000 

RUPT 

DAC 

** 

0177 

00341 

14 0102 


OCP 

•102 

0170 

00342 

34 0507 


SKS 

•507 

017° 

0 0 3 4 3 

0 01 00370 


JMP 

PDO 

0180 

00 34 4 

34 0407 


SKS 

•407 

018 1 

00346 

0 01 00607 


JKP ■ 

GDO 

0182 

00346 

34 0607 


SKS 

•607 

0191 

00347 

0 01 00364 


JMP 

ICLK 

0184 

00350 

34 0425 


SKS 

•425 

0185 

00351 

0 01 00362 


JKP 

DISK 

0186 

00362 

34 0404 


SKS 

• 404 

0187 

00351 

0 01 00356 


JKP 

ASR 

0188 

00354 

000401 

RSM 

EBB 


0188 

00156 

>0 01 00340 


JKP* 

RUPT 

0190 



* 



0191 

00356 

14 0004 

A SR 

OCP 

4 

0192 

00157 

54 0004 


INA 

4 

ni<n 

00160 

101000 


WOP 


0194 

0 0361 

0 01 00354 


JKP 

RSM 

0196 



* 



0196 

00162 

14 1425 

DISK 

OCP 

* 1425 

0197 

00363 

0 01 00354 


JKP 

RSM 

0190 



* 



0199 

00?64 

14 0027 

ICLK 

OCP 

•27 

0200 

00365 

14 0067 


OCP 

•67 

0201 

00166 

0 01 00354 


JKP 

RSM 

0202 

00367 

030000 

DOS 

OCT 

30000 

020.1 



♦ 



0204 



* 



0 2 06 

00370 

0 13 00326 

PDO 

IKA 

A REG 

02 06 

00371 

00 0043 


INK 


oio* 7 

00172 

000005 


SGL 


0200 

00373 

0 04 00334 


STA 

KEYS 

0209 

00374 

000201 


TAB 


0210 

00375 

0 04 00330 


STA 

BREG 

02H 

00376 

0 15 00332 


STX 

XREG 

0212 



* 



0211 



* 



0214 



* 



0216 



* 



0216 

00377 

0 10 00000 


CALL 

INPIP 

0217 

00400 

000401 


EBB 


0219 

00401 

0 10 00000 


CALL 

ACOH 

0219 

00402 

0 10 ooooo 


CALL 

PRBI 

0220 

00403 

0 10 ooooo 


CALL 

ROMS 


SHUT OPF DCS 


DISK BUPT 
ASP BUPT 

DOMMPT 
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NICP0C01P TELECOHMTNICAT ED DAT ft 



DDP- 

516 

ASSEflBLY 

LISTING 


0221 

00404 

0 

10 

00000 

CALL 

PP AC 

0222 

00405 

0 

10 

00000 

CALL 

PFDI 

022? 

00406 

0 

10 

22024 

JST 

PIPH 

0274 

00407 

0 

10 

20500 

JST 

spun 

022 c ' 

00410 

0 

10 

21000 

JST 

VELA 

0726 

0041 1 

0 

10 

00000 

CALL 

VACO 

022^ 

004 12 

000007 

FAKS DBL 


0220 

004 1 3 

0 

02 

00770 

OLD 

♦770 

0220 

00414 

0 

07 

00222 

DSB 

POOP 

0 230 

004 15 

000005 

SGL 


0231 

00 U 16 

100400 

SPL 


0232 

00417 

0 

01 

00577 

J HP 

COHN 

0233 

00420 

0 

02 

00332 

IDA 

XREG 

023^ 

00421 

0 

04 

00333 

STA 

GEF X 

02 3 0 

00422 

0 

02 

00 3 34 

L DA 

KEYS 

023 0 

00423 

0 

04 

00335 

STA 

SYEK 

02?" 

004 24 

0 

02 

00326 

LDA 

A PEG 

0 2 30 

00 4 25 

0 

04 

00327 

STA 

GERA 

02 3° 

00426 

0 

02 

00330 

L DA 

BPEG 

0 240 

0 0*127 

0 

04 

00331 

STA 

GEPB 

024 1 

00430 

0 

02 

00 340 

LDA 

FUPT 

0242 

00431 

0 

04 

00336 

STA 

TP UP 

02 4 3 

00432 

000007 

DPI, 


0244 

00433 

0 

02 

00772 

OLD 

» 772 

0240 

00434 

0 

07 

00224 

DSB 

NOOP 

0 240 

00435 

000005 

SGL 


0247 

004 36 

100400 

SPL 


0240 

00437 

0 

01 

00550 

JMP 

N SOB 

0 2 4 n 

00440 

0 

02 

00773 

LDA 

= 1 

0250 

0044 1 

0 

04 

00337 

STA 

OUTB 

0251 

00442 

000007 

DBL 


0252 

00443 

0 

02 

00460 

OLD 

♦ 460 

0253 

00444 

0 

04 

00232 

DST 

QTMP 

0254 

00445 

0 

02 

00464 

DLD 

•464 

02 55 

0 0446 

0 

04 

00 2 34 

DST 

QTMP+2 

0256 

00447 

0 

02 

00470 

DLD 

♦ 470 

0257 

0 0450 

0 

04 

00236 

DST 

OTHP+4 

0 2 5^ 

00451 

0 

02 

00474 

DLD 

♦ 474 

02 5° 

0 0 4 5 2 

0 

04 

00240 

DST 

QTHP+6 

0260 

0045^ 

0 

02 

00330 

DLD 

*330 

0261 

00 454 

0 

04 

00344 

DST 

♦ 344 

0262 

00455 

-0 

02 

00207 

DLD* 

VP 

0263 

00456 

0 

04 

00242 

DST 

QTHP + 8 

0264 

00457 

0 

02 

00332 

DLD 

• 332 

0265 

00 4 6 0 

0 

04 

00346 

DST 

*346 

076 6 

00461 

-0 

02 

00210 

DLD* 

VE 

02 6"' 

00462 

0 

04 

00244 

DST 

OTMP+10 

0263 

00463 

0 

02 

00334 

DLD 

♦ 334 

026 n 

004 64 

0 

04 

00350 

DST 

' 350 

0270 

00465 

-0 

02 

00211 

DLD* 

VN 

0271 

00466 

0 

04 

00246 

DST 

OTHP+12 

0272 

00467 

0 

02 

00336 

DLD 

• 336 

0273 

00470 

0 

04 

00352 

DST 

' 352 

0274 

00471 

-0 

02 

00212 

DLD* 

LA HB 

0275 

00472 

0 

04 

00250 

DST 

QTHP+14 

0276 

00473 

0 

02 

00340 

DLD 

• 340 

0277 

00474 

0 

04 

00354 

DST 

* 354 
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*ICPOCOMP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0270 

00475 

-0 

02 

00213 

DLD* 

OMGA 

0279 

00476 

0 

04 

00252 

DST 

QTNP+16 

0280 

00477 

0 

02 

00342 

DLD 

* 342 

0281 

00500 

0 

04 

00356 

DST 

* 356 

0282 

00501 

-0 

02 

00214 

DLD* 

a 

0203 

00502 

0 

04 

00254 

DST 

QTMPT18 

0284 

00503 

0 

02 

00664 

DLD 

• 664 

0285 

00504 

0 

04 

00744 

DST 

•744 

0286 

00505 

0 

02 

00666 

DLD 

•666 

0287 

00506 

0 

04 

00746 

DST 

•746 

0280 

00507 

0 

02 

00670 

DLD 

*670 

0289 

00510 

0 

04 

00750 

DST 

•750 

0290 

00*11 

0 

02 

00672 

DLD 

*672 

0291 

00512 

0 

04 

00752 

DST 

•752 

0292 

00513 

0 

02 

00674 

DLD 

•674 

0293 

00514 

0 

04 

00754 

DST 

•754 

0794 

00515 

0 

02 

00676 

DLD 

•676 

0295 

00516 

0 

04 

00756 

DST 

*756 

0296 

00517 

0 

02 

00776 

DLD 

TIMS 

02 97 

00520 

0 

04 

00256 

DST 

QTMP* 20 

0298 

00521 

0 

02 

00324 

DLD 

•3 24 

0299 

00522 

0 

04 

00260 

DST 

QTMP+22 

0300 

00523 

0 

02 

00316 

DLD 

* 316 

0301 

00524 

n 

04 

00262 

DST 

QTMP* 2 4 

0302 

00525 

0 

02 

00320 

DLD 

•320 

o 303 

00526 

0 

04 

00264 

DST 

OTMP+26 

0304 

00527 

0 

02 

00322 

DLD 

• 322 

0 3C5 

00530 

0 

04 

00266 

DST 

QTMP+28 

03 06 

00531 

0 

02 

00216 

DLD 

DZRO 

0907 

00532 

0 

04 

00330 

DST 

•330 

03 09 

00533 

0 

04 

00332 

DST 

' 332 

0309 

005 34 

0 

04 

00334 

DST 

• 334 

0310 

00535 

0 

04 

00336 

DST 

•336 

9311 

0053* 

0 

04 

00340 

DST 

•340 

031 2 

00537 

0 

OU 

00342 

DST 

• 342 

0313 

00540 

0 

04 

00664 

DST 

• *664 

0314 

00541 

0 

04 

00666 

DST 

•666 

0915 

00*42 

o 

04 

00670 

DST 

•670 

0316 

00543 

0 

04 

00672 

DST 

•672 

0317 

00544 

0 

04 

00674 

DST 

•674 

0319 

00545 

0 

04 

00676 

DST 

•676 

0319 

00546 

0 

04 

00772 

DST 

• 772 

0320 

00547 

000005 

SGL 


0921 

00550 

000007 

NSOB DDL 


0322 

00551 

0 

02 

00216 

DLD 

DZRO 

0.3 23 

00552 

0 

04 

00770 

DST 

*770 

0324 

00553 

000005 

SGL 


0325 

00554 

0 

10 

00000 

CALL 

BOOT 

07 2 6 

00555 

0 

02 

00722 

LDA 

CAPN 

0 327 

00556 

101040 

SNZ 


03 2 q 

00557 

0 

01 

00564 

JHP 

* + 5 

0329 

00560 

100010 

SP2 


0330 

00561 

0 

10 

00000 

CALL 

LNAV 

0331 

00562 

101010 

SS2 


0332 

00563 

0 

10 

00000 

CALL 

FflLN 

0333 

00564 

001001 

TNH 


0 33 4 

00565 

0 

02 

00333 

LDA 

GEPX 
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MTCPOCOMP TELECOMMUNICATED DATA 



DDP- 

516 

ASS 

EMBLY 

LISTING 

0 335 

00566 

0 

04 

00332 


STA 

033 6 

00567 

0 

02 

00335 


LDA 

0337 

00570 

0 

04 

00334 


STA 

0338 

00^71 

0 

0? 

00327 


LDA 

0 3 37 

00572 

0 

04 

00326 


STA 

0340 

00573 

0 

0 2 

00331 


LDA 

0341 

00574 

0 

04 

00330 


STA 

0342 

00575 

0 

02 

00336 


LDA 

0 34 3 

00576 

0 

04 

00340 


STA 

0344 





♦ 


0345 





* 


0345 

00577 

0 

35 

00332 

COM N 

LDX 

034 - * 

00600 

0 

02 

00330 


LDA 

0349 

00601 

00020 

>1 


IAB 

0349 

00602 

0 

02 

00334 


LDA 

0350 

00603 

11 

r 1 0 20 


OTK 

0351 

00604 

0 

13 

00326 


I HA 

035? 

00605 

000401 


ENR 

0353 

00606 

-0 

01 

00340 


J HP* 

0354 





* 


0355 





* 


0 3 55 

00607 

0 

13 

00326 

GDO 

I HA 

0 3 57 

00610 

oooot 

J 3 


INK 

0357 

006 11 

000005 


SGL 

0 355 

00612 

0 

04 

00334 


STA 

0350 

00613 

000201 


IAB 

0361 

00614 

0 

04 

00330 


STA 

0362 

00615 

0 

15 

00332 


STX 

0363 





* 


0364 





* 


0 36 5 

00516 

34 0007 


SKS 

0366 

0 0617 

0 

01 

00616 


J HP 

0367 

00620 

1i 

4 Oi 

4 06 


OCP 

0369 

00621 

0401 

62 


LRS 

0 3 69 

006 22 

5 J 

4 1 1 

016 


INA 

0 370 

00623 

101000 


NOP 

0371 

00624 

0 

04 

00324 


STA 

0372 

00625 

54 1006 


INA 

0373 

00626 

1 

01000 


NOP 

0374 

00627 

0 

04 

00325 


STA 

0375 

00630 

11 

4 0006 


OCP 

0376 

00631 

0 

10 

00000 


CALL 

0377 

00632 

000401 


ENB 

03 79 

0 0633 

0 

10 

00000 


CALL 

0 37° 

00634 

0 

10 

00000 


CALL 

0380 

00635 

0 

10 

00000 


CALL 

0 30 1 

006^6 

0 

10 

00000 


CALL 

0382 

00637 

0 

10 

00000 


CALL 

0 38 3 

00640 

0 

10 

22053 


JST 

0384 

00641 

000007 


DBL 

0 385 

00642 

0 

02 

00776 


DID 

0386 

006 4 3 

0 

07 

00226 


DSB 

0387 

00644 

1 

00400 


SPL 

03 8 9 

00645 

0 

01 

00705 


JMP 

0 389 

00646 

1 

00040 


SZE 

0390 

00647 

0 

01 

00656 


J HP 

0391 

00650 

000201 


IAB 


XREG 

SYEK 

KEYS 

GERA 

AREG 

GERB 

BREG 

TPOR 

RDPT 


XREG 

BREG 

KEYS 

AREG 

FUPT 


AREG 


BREG 

XREG 


*007 

WAIT FOR DIGISEC 

*-1 


'406 

HOLD 

14 

WAIT 8 HCT * S 

*1016 

HIGH HALF 

*324 


'1006 

LOW HALF 

'325 


'006 

END HOLD 

INGYRO 


GCOH 


GRMP 


GRBT 


GPAC 


GFDI 


GYPR 


TIHE 


SIXS 


BF60 


OV60 
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MICROCHIP TFLECOHHaNTCATED DATA 



DDP- 

516 ASSEHBLY 

LISTING 


0392 

00651 

100040 


SZF 


0393 

00652 

0 01 00656 


JHP 

0V60 

0394 

00653 

000005 


SGL 


0395 

00654 

0 10 00000 


CALL 

LVCA 

0396 

00655 

0 01 00705 


JHP 

BF60 

0397 

00656 

0 02 00776 

OV60 

DLD 

TI HE 

0398 

00657 

0 07 00230 


DSB 

D260 

0 39Q 

00660 

100400 


SPL 


0900 

00661 

0 01 00700 


JHP 

B260 

0 401 

00662 

100040 


SZE 


0402 

00663 

0 01 00703 


JHP 

0260 

040' 1 

00664 

000201 


IAB 


0404 

00665 

100040 


SZE 


0406 

00ft 66 

0 01 00703 


JHP 

0260 

0406 

00667 

0 02 00216 


DLD 

DZPO 

0407 

00670 

0 04 00444 


D ST 

i 444 

04 08 

00671 

0 04 00450 


DST 

* 450 

0409 

00672 

0 04 00454 


PST 

•454 

0410 

00673 

000005 


SGL 


041 1 

00674 

0 02 C0773 


LDA 

= 1 

0412 

00675 

0 04 00722 


STA 

CAEN 

0 4 1 .3 

00676 

0 10 onooo 


CALL 

A ZC A 

0 414 

0 Oft 7 7 

0 01 00705 


JHP 

BFftO 

0416 

00700 

000005 

B 2 60 

SGL 


04 16 

00701 

0 10 00000 


CALL 

SVFL 

0417 

00702 

100000 


SKP 


0410 

00703 

0 10 21522 

0260 

J ST 

IRCO 

0419 

007QU 

0 10 20000 

NIBC 

J ST 

ATTA 

0420 

00705 

000007 

3F60 

DBL 


0421 

00706 

0 02 00770 


DLD 

1 770 

0 4 22 

00707 

0 06 00220 


DAD 

DONE 

0421 

00710 

0 04 00770 


DST 

* 770 

04 2 4 

00711 

0 02 00772 


DLD 

*772 

0 47 6 

00712 

0 06 00220 


DAD 

DONE 

04 2 6 

00713 

0 04 00772 


DST 

» 77 2 

0427 

00714 

0 02 00776 


DLD 

TINE 

0420 

00715 

0 06 00220 


DAD 

DONE 

04 20 

00 7 16 

C 09 00776 


DST 

TIHE 

043 0 

00717 

000005 


SGL 


0431 

00720 

0 01 00412 


JHP 

FAKS 

0432 



* 



043? 



* 



04 3 4 

00721 

000001 

NODE 

OCT 

1 

0 436 

00722 

000000 

CAFN 

OCT 

0 

04 36 


022024 

PIPR 

EQU 

* 22024 

0437 


022053 

GYPR 

Eon 

*22053 

0438 


020000 

ATTA 

eoo 

« 20000 

0 4 30 


020500 

SPUN 

EOT.r 

*20500 

0440 

0072.7 


BASE 

BSS 

40 

0441 


021000 

VELA 

EQO 

*21000 

0442 


021522 

I ECO 

EQO 

* 21522 

0443 

00773 

000001 


END 



00774 

000006 





00775 

040000 





00776 

177730 





00777 

177674 
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PROGRAM NAME: (Note: This is a FORTRAN program) 
SOURCE: FNOP 
BINARY: BFNOP 

ENTRY POINTS (LOCATION): OUTPUT ('2000) 
GENERAL DESCRIPTION: 


This subroutine outputs on the teletype the data saved by the 
main program in its buffer QTMP, It makes use of the subroutine FPOUTC 
which outputs a DAP double precision word in decimal with various scalings, 
and the FORTRAN subroutines,TlOU and TNOUA, used for teletype output. 
Several examples of the output format are shown below. 


GUAT 

U. 999999 

0.000048 

0 . ouUO 1 0 

VRVEVN 

0.000000 

0.000000 

G . uUGCOG 

LAL0AL 

0. 1 l 767S 

G.U0000C • 

0 .000000 

GYRO FAIL 




PIKA FAIL 




TIME 

840,00 



TAoLL 

0.999996 



STAl ISTIC 




IOC.'. 0 

0 

0 0 ■ 


comp a 

C 



POLAR 0 




31 AS 

0 . Q0CCC0 

U.OOOUOG 

u • J 0 0 G 0 0 

PART 

1 . 143554 

O. 190429 

l. 7 15820 


0.38 1835 ~ 

0.381335 - 

2. 09363 2 


0.000005 


0 • uGuGUO 


GOAT 

0.999999 - 

0.0003 17 

WVLVN 

0.003936 

0.6 2960b 

LAL0AL 

0. 1 17675 

0.0000 16 

GYRO FAIL 
PIP A FAIL 
TIhL 

3480. uo 


I A DLL 

0.999996 


STATISTIC 
I DEN 0 

0 

0 0 

COMP C 

0 


POLAR 0 

BIAS 

o . 0 0 0 0 u 0 

0.000000 

PART 

0.571289 - 

0. 191406 


C. 571289 “ 

0.763671 


u* 000009 " ^j.GGuulO 

0.129211 

U. 0 225 9 9 


0 . iJuOGUC u.OuOOOU 

0.000000 

1.526357 
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DEFINITIONS IN PRINTOUT FORMAT 


QUAT 

X 

non dimensional 

(radians) 

P P 

^(radians) z (radians) 

VRVEVN 

RADIAL 

VELOCITY 

(meters/sec) 

EAST 

VELOCITY 
(meters/ sec) 

NORTH 

VELOCITY 

(meters/sec) 

LALOAL 

LATITUDE 

(42. 36° =. 117678 rev) 

LONGITUDE 

(rev) 

ALTITUDE 

(meters) 

GYRO FAIL 

1st FAIL 

2nd FAIL 


PIPA FAIL 

1st FAIL 

2nd FAIL 


TIME 

PROGRAM TIME 
(seconds) 



TABLE 

TABLE ANGLE 
(rev) 



STATISTIC 

1st FAIL 

2nd FAIL 


IDEN 

1st FAIL 
P=bias 
N = ramp 

2nd FAIL 

P=bias 

N=ramp 


COMP 

1st FAIL 
(N = variance) 

2nd FAIL 
(N=variance) 



POLAR 


BIAS 


>AR r 


POLARITY OF OVERLIMIT PARITY EQ 
(N=negative) 

(P=positive) 


1st GYRO FAIL 
(degrad. est) 
(bias or ramp) 


2nd FAIL GYRO 
(degrad. est) 
(bias or ramp) 


1st FAIL ACC 
(degrad. est) 


2nd FAIL ACC 
(degrad. est) 


PARITY 1 EQ RESIDUAL 

EQl(meru) EQ2(meru) 

EQ4(meru) EQ5(meru) 


EQ3(meru) 

EQ6(meru) 
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MlC^OCOMp TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 
SUBROUTINE OUTPUT (A RG r MODE) 


000000 

DAC 

oooooo 

000001 

CALL 

F* AT 

000002 

OCT 

000002 

0000 n 3 

DAC 

oooooo 

000004 

DAC 

oooooo 

INTEGER. APG {60 ) , MODE 

CALL TNOU A ( 9H0U AT ,8) 

000005 

IMP 

000004 


STG 

000005 

000006 

JMP 

oooooo 

000007 

OCT 

150725 

000010 

OCT 

140724 

000011 

OCT 

120240 

000012 

OCT 

120240 


STG 

000006 

000013 

CALL 

TNOU A 

000014 

DAC 

000007 

000015 

DAC 

S '000010 

000016 

OCT 

oooooo 

DO 

10 1=1 

,7,2 

000017 

LDA 

-• 000001 

000020 

ST A 

I 

CALI FPOIJ 

T { AEG (I) ,1,6) 

OD0021 

LDA 

I 

000022 

a nn 

ARG 

000023 

ADD 

000025 

000024 

JMP 

000026 

000025 

OCT 

177777 

000026 

STA 

T $ 1 0 00 

000027 

CAT L 

FPOUTC 

000030 

DAC* 

T$ 1 000 

000031 

DAC 

= « 000001 

OOOn 32 

DAC 

=* 000006 

000033 

OCT 

oooooo 

10 CA 

L T TNG? 

A ( 2 H , 2 ) 

000034 

C.ALT 

TNOU A 

000035 

DAC 

= • 120240 

000036 

DAC 

~ *000002 

000037 

OCT 

OOOOOO 

000040 

LDA 

I 

000041 

ADD 

. = ' 000002 

000042 

CAS 

='000007 

000043 

JMP 

000046 

000044 

JMP 

000020 

000045 

JMP 

000020 

CALI T10H (138) 

000046 

CALL 

T 10 U 

0 000 47 

DAC 

=•000212 

CA 

LI, TNOU? (8HVRVEVN ,8) 

000050 

JMP 

oooooo 

000051 

OCT 

15332? 

000052 

OCT 

153305 

000053 

OCT 

153316 

000054 

OCT 

120240 


STG 

000050 

000055 

CALL 

TNOU A 
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MCPOCONP TELECOflHUNICATED DATA 

LISTIHG 



DDP- 

516 asse«b: 

000056 

BAC 

000051 

000057 

DAC 

>=•000010 

000060 

OCT 

000000 

00 20 1=9 

,13,2 

000061 

LDA 

=•000011 

000062 

STA 

I 

CALL FPOTJTC (ARG (I) , 

000063 

LDA 

I 

000064 

ADD 

ARC 

000065 

ADD 

000067 

000066 

J IP 

000070 

000067 

OCT 

177777 

000070 

STA 

T$1 000 

000071 

CALL 

FPOUTC 

000072 

DAC* 

T$t000 

000073 

DAC 

=’000017 

000074 

DAC 

='000006 

000075 

OCT 

000000 

20 

CALL q, N00A{2H ,2) 

000076 

CALL 

TNOUA 

000077 

DAC 

= ' 120240 

000100 

DAC 

= '000002 

000101 

OCT 

oooono 

000102 

LDA 

I 

000103 

ADD 

=' 000002 

000104 

CAS 

= '000015 

000105 

J*P 

000110 

000106 

J^P 

000062 

000107 

J^P 

000062 

CALL TlOU 

(138) 

000110 

CALL 

Tion 

000111 

DAC 

='000212 


CALL TNOTJ 

A (3HLALOAL 

000112 

J«P 

oooooo 

0001 1 3 

GC* 

146301 

000114 

OCT 

146317 

000115 

OCT 

1407 14 

000116 

OCT 

120240 


STG 

0001 12 

0001 17 

CALL 

TROD A 

000120 

DAC 

000113 

000121 

DAC 

= *000010 

000122 

OCT 

oooooo 

CALL PPOOTC (ABO (15) 

000123 

LDA 

A RG 

000124 

ADD 

000126 

000125 

JKP 

000127 

000126 

OCT 

000016 

000127 

STA 

TS1000 

000130 

CALL 

TPOOTC 

000131 

DAC* 

TS1000 

000132 

DAC 

='000000 

000133 

DAC 

=» 000006 

000134 

OCT 

OOOOOO 

CALL THOOA(2H , 2 ) 

000135 

CALL 

TNOOA 

0001 36 

DAC 

=•120240 


15 , 6 ) 


, 8 ) 
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MICPOCOMP TELECOMMUNICATED DATA 



DDP-516 assembly listing 

0001 37 

O AC 

*•000002 

000140 

OCT 

000000 

CALI FPOUTC (ARC (17) ,0,6) 

0001 41 

L DA 

ARC 

000142 

ADD 

000144 

000143 

,7MP 

000145 

000144 

OCT 

000020 

000145 

STA 

T $ 1 000 

000146 

CALL 

FPODTC 

000147 

DAC* 

T* 1000 

000150 

n ac 

=*000000 

000151 

DAC 

-• 000006 

0001 52 

OCT 

000000 

CALL TNOITA (2H ,2) 

000153 

CALL 

TNOO A 

000154 

DAC 

= « 120240 

000155 

DAC 

=*000002 

000155 

OCT 

oooooo 

CALL FPOU' 

re (APG (1°) ,15,6) 

000157 

LDA 

ARC 

000160 

ADD 

000162 

000161 

JMP 

000163 

000162 

OCT 

000022 

000163 

STA 

T $ 1000 

000164 

CAII. 

FPOUTC 

000165 

DAC* 

T* 1000 

000166 

DAC 

= *000017 

000167 

DAC 

= * 000006 

000170 

OCT 

oooooo 

CALL T 100 

(13B) 

000171 

CALL 

Tion 

000172 

DAC 

=*000212 

CALL THOUM10HRYRO FAIL # 10 ) 

000171 

.IMP 

oooooo 

000174 

OCT 

143731 

0O0175 

OCT 

151317 

000176 

OCT 

120306 

000177 

OCT 

140711 

000200 

OCT 

146240 


STG 

000173 

000201 

CALL 

T NOD A 

000202 

DAC 

000174 

000203 

DAC 

= *000012 

000204 

OCT 

OOOOOO 

IF 

(ARC, (25) . EO.O) GO TO 35 

000205 

LDA 

ARG 

000206 

ADD 

000210 

000207 

JMP 

000211 

000210 

OCT 

000030 

000211 

STA 

TS1000 

000212 

LDA* 

T$1000 

000211 

57 E 

OOOOOO 

000214 

JMP 

oooooo 

000215 

JMP 

.35 


STG 

000214 

CALT. TNO0A(4H ,4) 

000216 

JMP 

OOOOOO 



MICRCCOMP TELECOM MU NIC AT FD DATA 



DDP- 

516 ASSEMBLY LISTING 

000217 

OCT 

120240 

000220 

OCT 

120240 


STG 

000216 

000221 

CALL 

TNOUA 

000222 

DAC 

000217 

00022 3 

DAC 

= *000004 

000224 

OCT 

000000 

CALL T10U (ARC (25} + 192) 

000225 

LDA 

ARG 

000226 

ADD 

000230 

000227 

IMP 

000231 

000230 

OCT 

000030 

000231 

STA 

TJ 1 000 

000232 

LDA* 

TS1000 

000233 

ADD 

= * 000 300 

000234 

STA 

T? 1001 

000235 

CALL 

T10U 

000236 

DAC 

TUI 00 1 

I P (ARG(26) . EQ.O) GO TO 35 

000237 

LDA 

ARG 

000240 

ADD 

000242 

000241 

J«P 

000243 

000242 

OCT 

000031 

000243 

STA 

Tt 1000 

000244 

LDA* 

T$1000 

000245 

SZE 

000000 

000246 

J W P 

oooooo 

000247 

JWP 

. 35 


STG 

000246 

CUL TN0UAI4H ,4} 

000250 

JMP 

oooooo 

000251 

OCT 

120240 

000252 

OCT 

120240 


STG 

000250 

000253 

CALL 

TNOOA 

000254 

DAC 

000251 

000255 

DAC 

-• 000004 

000256 

OCT 

OOOOOO 

CALL T10U (ARG(26) +1 92) 

000257 

LDA 

ARG 

000260 

ADD 

000262 

000261 

JMP 

000263 

000262 

OCT 

000031 

000263 

STA 

T# 1000 

000264 

LDA* 

T$ 1000 

000265 

ADD 

=*000300 

000266 

STA 

T$1001 

000267 

CALL 

t i on 

000270 

DAC 

T$1001 

IF (ARC (29) 

• NE.O) CALL TNOOA (10 

000271 

LDA 

ARG 

000272 

ADD 

000274 

000273 

JMP 

000275 

000274 

OCT 

000034 

000275 

STA 

T $ 1 000 

000276 

LDA* 

TS1000 

000277 

SNZ 

OOOOOO 


THIRD ,10} 
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MICFOCOMP TELECOMMUNICATED DAT A 
DDP-516 assembly listing 


000300 

JMP 

000000 

000301 

OMP 

OOonnn 

000302 

OCT 

120240 

000303 

OCT 

120240 

000304 

OCT 

152310 

000305 

OCT 

144722 

000306 

OCT 

142240 


5TG 

000301 

000307 

C A LI 

TNOOA 

000310 

DAC 

000302 

000311 

DAC 

= *000012 

000.^1 2 

OCT 

oooooo 


STG 

000300 

3 5 CALT 

T 10TJ (138) 


STG 

. 35 

000313 

CALL 

Tlnri 

000314 

DAC 

=*000212 

CAT. I 

, TNOOA 

(10HPIPA FAIL 

000316 

JMP 

OOOOOO 

000316 

OCT 

15031 1 

000317 

OCT 

150301 

000320 

OCT 

120306 

000321 

OCT 

140711 

000322 

OCT 

146240 


STG 

000315 

000323 

CALL 

TNOOA 

000324 

DAC 

000316 

000325 

DAC 

=' 000012 

000326 

OCT 

oooooo 

IF (AFC (27) 

. EQ. 0) GO TO 

00032"? 

LDA 

ADO 

000330 

ADD 

000332 

000331 

J^p 

OOD333 

0 0 0 .3 3 2 

OCT 

000032 

000333 

STA 

T* 1000 

000334 

LDA* 

Tt 1 000 

000335 

S7.E 

OOOOOO 

000336 

*7 HP 

OOOOOO 

0 0 0 3 3 7 

J*P 

. 40 


STG 

000336 

CAII TNOOA (4 H ,4) 

000340 

JMP 

OOOOOO 

000341 

OCT 

120240 

000342 

OCT 

120240 


STG 

000340 

0O0343 

CALL 

TNOOA 

000344 

DAC 

000341 

000345 

DAC 

=' 000004 

000346 

OCT 

OOOOOO 

C*LL T10U(AFG (27) + 19?) 

0 0 0 3 4 7 

LDA 

ARG 

000350 

ADD 

000352 

000351 

JMF 

000153 

000352 

OCT 

000032 

000353 

STA 

T$ 1000 

000354 

LDA* 

TJ 1000 

000355 

ADD 

=•000300 
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HI CP OCOHP TEIECOHHmilCATED DATE 


DDP-516 ASSEHBLT LISTIWG 

000356 

STA 

TS1001 

000357 

CALL 

TlOO 

000360 

DAC 

TS1001 

IF (AEG (28) 

, EQ.O) GO TO 40 

000361 

LDA 

ARG 

000362 

ADD 

000364 

000363 

JHP 

000365 

000364 

OCT 

000033 

000365 

STA 

Tf 1000 

000366 

LDA* 

TflOOO 

000367 

SEE 

000000 

000370 

JHP 

000000 

000371 

JHP 

.40 


STG 

000370 

CALI TROUA ( 4H ,4) 

000372 

JHP 

000000 

000373 

OCT 

120240 

000374 

OCT 

120240 


STG 

000372 

000375 

CALL 

THOOA 

000376 

DAC 

000373 

000377 

DAC 

- * 000004 

000400 

OCT 

000000 

CALL T100(AFG(28) + 192) 

000401 

LDA 

ARG 

000402 

ADD 

000404 

000403 

JHP 

000405 

000404 

OCT 

000033 

000405 

STA 

Tf 1000 

000406 

LDA* 

TflOOO 

000407 

ADD 

='000300 

000410 

STA 

Tf 1001 

000411 

CALL 

TlOO 

000412 

DAC 

TflOOl 

IF {ARC (30) 

• HE. 0) CALL THOOA (10H 

000413 

LDA 

ARG 

000414 

ADD 

000416 

000415 

JHP 

000417 

000416 

OCT 

000035 

000417 

STA 

TflOOO 

000420 

LDA* 

TflOOO 

000421 

SNZ 

000000 

000422 

JHP 

000000 

000423 

JHP 

000000 

000424 

OCT 

120240 

000425 

OCT 

120240 

000426 

OCT 

152310 

000427 

OCT 

144722 

000430 

OCT 

142240 


STG 

000423 

000431 

CALL 

THOOA 

000432 

DAC 

000424 

000433 

DAC 

*'000012 

000434 

OCT 

000000 


STG 

000422 

40 

CALL TlOO (1 3B) 


STG 

.40 


THIRD ,10) 
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"TC*OCO*P TELECO«nUNICATED DATA 
DDP-516 ASSBHPLY LISTING 


000495 

CALL 

T 1 00 

000436 

DAC 

=’000212 

CAJt ‘I’NOUA (3HTTEE ,8) 

000497 

JMP 

000000 

000440 

OCT 

152311 

000441 

OCT 

146705 

000442 

OCT 

120240 

000443 

OCT 

120240 


STG 

0004 37 

000444 

CALL 

TNOOA 

000445 

0 AC 

000440 

000446 

0 AC 

=• 000010 

000447 

OCT 

000000 


C*LL OUT1 

00 ( ARG (21) ) 

0O0450 

LP A 

A PC 

000451 

ADD 

000453 

000452 

J*P 

000454 

000453 

OCT 

000024 

000454 

S m A 

T51000 

000455 

CALL 

OtlTlOO 

00045ft 

DAC* 

T51000 


CALI T 104 (13 ft) 

000457 

CALL 

T 1 00 

000460 

DAC 

=’000212 

CALL TNOUA (R H? ARLE , B) 

000461 

7*p 

000000 

000462 

OCT 

152301 

000463 

OCT 

141314 

000464 

OCT 

142840 

000465 

OCT 

120240 


STG 

000461 

000466 

CALL 

TNOOA 

000467 

DAC 

000463 

000470 

DAC 

= * 000010 

000471 

OCT 

000000 


CALL 

"C (ARG (23) , 0 , 6) 

000479 

LD A 

ARC 

000473 

ADD 

000475 

000474 

<7 IP 

000476 

000475 

OCT 

000026 

000476 

STA 

T? 1000 

000477 

CALL 

FPOUTC 

000500 

DAC* 

T? 1000 

000501 

DAC 

=’ 000000 

000502 

DAC 

= ’000006 

000503 

OCT 

000000 

CALL T 1 00 

(13R) 

000504 

CALL 

T10U 

000505 

DAC 

=*000212 


CATL TNOMA ( 1 OH STATISTIC 

000506 

JM? 

000000 

000507 

OCT 

151724 

000510 

OCT 

140724 

000511 

OCT 

144723 

000512 

OCT 

15231 1 

000513 

OCT 

141640 


S^G 

000506 
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tlXCftOCORP Tft&SCOltBUirXCATSD DATA 
DDP-516 ASSEBBLY LISTING 


000514 

CALL 

TTOOA 

000515 

DAC 

000507 

000516 

DAC 

**000012 

000517 

OCT 

000000 

IP (ARG <3 11 

.BQ.O) GO TO 

000520 

LDA 

ARG 

000521 

ADD 

000523 

000522 

JBP 

000524 

000523 

OCT 

000036 

000524 

STA 

TSIOOO 

000525 

LDA* 

TSIOOO 

000526 

STB 

000000 

000527 

JBP 

000000 

000530 

JBP 

• 55 


STG 

000527 

CALL TSOOA(4H ,4) 

000531 

JBP 

000000 

000532 

OCT 

120240 

000533 

OCT 

120240 


STG 

000531 

000534 

CALL 

TN07A 

000535 

DAC 

000532 

000536 

DAC 

000004 

000537 

OCT 

000000 

CALL TlOO(ARG(31) *192) 

000540 

LDA 

AEG 

000541 

ADD 

000543 

000542 

JBP 

000544 

000543 

OCT 

000036 

000544 

STA 

TSIOOO 

000545 

LDA* 

TSIOOO 

000546 

ADD 

- * 000300 

000547 

STA 

TS 100 1 

000550 

CALL 

Tion 

000551 

DAC 

TS1001 

IF 

{APR (321 

| . EQ.O) GO TO 

000552 

LDA 

ARG 

000553 

* *>FS 

AUU 

000555 

000554 

JBP 

000556 

000555 

OCT 

000037 

000556 

STA 

TSIOOO 

000557 

LDA* 

TSIOOO 

000560 

SZE 

000000 

000561 

JBP 

000000 

000562 

JBP 

.55 


STG 

000561 

CALL TNOOA ( 4H ,4) 

000563 

JBP 

000000 

000564 

OCT 

120240 

000565 

OCT 

120240 


STG 

000563 

000566 

CALL 

TROD A 

000567 

DAC 

000564 

000570 

DAC 

* *000004 

000571 

OCT 

000000 


CALI T1 00 (ARG (32) *192) 
000572 LDA ARG 



IlCPOCOrP TKI.ECON NUN IC AT ED DATA 
P DP -6 1 ft ASSTTPLY LISTING 
000673 AD" 000675 

000674 j«n OO0S76 

0D0S7S OCT 000017 

000676 ST A T*1000 

000677 t.nA* TT1000 

00060" ADD = ' 000300 

0000 01 ST A Tfiooi 

000007 CALI. T 1 0 U 

Ono6(n DAT Tfioni 

I r (ADS ( 37) . NT.O) CALL TNOUA(10H THIRD ,10) 


000604 

LP A 

A PC 

0 0 0 6 0 6 

ADD 

000507 

000500 

ON" 

0 0 0610 

0 0 0 5 0 7 

OCT 

000044 

0 005 1 0 

S T A 

T $ 1 000 

000511 

IDA* 

T $ 1 0 0 0 

00051 : 

S N7, 

oooooo 

0 o 0 5 1 1 

JND 

oooooo 

000514 

,1 MP 

000 00 0 

D D 0 5 1 r - 

OCT 

120240 

000516 

OCT 

120240 

000617 

OCT 

157310 

0 ( ' 0 5 70 

OCT 

144722 

000571 

OCT 

142740 


STG 

000514 

000572 

C A I T. 

T NO U A 

000523 

P AC 

000616 

0 0 0 o 2 4 

D AC 

='000017 

000575 

OCT 

oooooo 


STG 

0006 1 3 

55 

CALI. 'MlMi (11°) 


S^G 

. 6 6 

000576 

C ' I L 

T 1 CM 

oo 05 77 

n ac 

= « 000712 

CALL ,,, NOHA <RHinEN 

7 006 30 

JTP 

O00000 

0006 1 1 

OCT 

144704 

00 057 7 

OCT 

142716 

000637 

OCT 

120240 

00 06 74 

OCT 

120240 


STG 

0006 10 

000635 

CALL 

TNOHA 

o OD6 7 f- 

D A C 

0 00 6 31 

000637 

D AC 

= • 0 0 n 0 1 0 

0 006 4 0 

fiff 

ooonoo 


CALL T10U 

t A?G ( 34) ♦ 

"00541 

IDA 

A RH 

0 0 C 6 4 7 

A op 

COD644 

00054? 

JMD 

000645 

000544 

nrc 

0 0 0 0 4 1 

0 0 0 6 4 5 

STA 

T$ 1 OQ 0 

0 0 06 4 5 

L DA * 

T $ 1 000 

SO 064 7 

add 

='000317 

0 0 0 6 5 o 

Si- A 

TS 100 1 

000551 

CALL 

T 1 OU 

000552 

DAC 

T* 1001 


C? I L * NOUA ( 4 H ,4) 
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HICPOCOMP TELECOM HONICATED DATA 
DDP-516 ASSEMBLY LISTING 


000653 

JMP 

000000 

000654 

OCT 

120240 

000655 

OCT 

120240 


STG 

000653 

000656 

CALL 

TNO0A 

000657 

DAC 

000654 

000660 

DAC 

= • 000004 

000661 

OCT 

000000 

CALL TIOO (ARG (33) +207) 

000662 

LDA 

ARG 

000663 

ADD 

000665 

000664 

JMP 

000666 

000665 

OCT 

000040 

000666 

STA 

TS1000 

000667 

LDA* 

T$1000 

000670 

ADD 

~ 1 000317 

000671 

STA 

TS1001 

000672 

CALL 

T10T! 

000673 

DAC 

T$1001 

CALL TNOUA (12H 

000674 

JMP 

000000 

000675 

OCT 

120240 

000676 

OCT 

120240 

000677 

OCT 

120240 

000700 

OCT 

120240 

000701 

OCT 

120240 

000702 

OCT 

120240 


STG 

000674 

000703 

CALL 

TNOTIA 

000704 

DAC 

000675 

000705 

DAC 

** 000014 

000706 

OCT 

000000 

CALL T10U(ARG(59) +207) 

000707 

LDA 

ARG 

000710 

ADD 

000712 

000711 

JMP 

000713 

000712 

OCT 

000072 

000713 

STA 

TS1000 

000714 

LDA* 

T$1000 

000715 

ADD 

='000317 

000716 

STA 

T$100 1 

000717 

CALL 

TIOO 

000720 

DAC 

TtlOOl 

CALL TNOUA<4R ,4) 

000721 

JMP 

000000 

000722 

OCT 

120240 

000723 

OCT 

120240 


STG ' 

000721 

000724 

CALL 

TNOTIA 

000725 

DAC 

000722 

000726 

DAC 

= » 000004 

000727 

OCT 

000000 

CALL T10U(ARG(60) ♦207} 

000730 

LDA 

ARG 

000731 

ADD 

000733 

000732 

JMP 

000734 

000733 

OCT 

000073 
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MTCPOCOMP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


000734 

S7A 

1000 

000735 

T, DA* 

TS1000 

000736 

ADD 

= * 0 0 0 317 

000737 

ST A 

T $ 100 1 

000^40 

CALL 

t i ou 

000741 

DAC 

TJ 1001 


C A 1 1 T 1 0U ( 1 3 3 ) 


000742 

CALL 

T 10 U 

000743 

DAC 

='000212 


CALL TS01JA 

( qUCDfl? 

000744 

JMP 

oooooo 

000745 

OCT 

141717 

000746 

OCT 

146720 

000747 

OCT 

120240 

000750 

OCT 

120240 


STG 

000744 

000751 

CAI.T 

TNOUA 

000752 

n*c 

000745 

000753 

DAC 

= '0000 10 

000754 

OCT 

oooooo 


CALL T1 00 (A PC, (36) + 

0007S5 

LDA 

A P G 

000766 

ADD 

000760 

000757 

JNP 

00076 1 

000760 

OCT 

000043 

000761 

S^A 

T $ 1 0 0 0 

000762 

LDA* 

T 5 1 0 0 0 

000763 

ADD 

= ' 000.317 

000764 

STA 

Til 001 

000765 

CALL 

T 10 rj 

000766 

D»C 

T$ 100 1 


CALL T’NOUA (4H , 

000767 


OOOOOO 

000770 

OCT 

120240 

000771 

OCT 

120240 


STG 

000767 

000772 

CALL 

TNOU A 

000773 

DAC 

00077Q 

000774 

DAC 

= *000004 

000^75 

OCT 

oooooo 


CALI. T10tI(A?G (35) +207) 


000776 

LDA 

ARC 

000777 

ADD 

001001 

001000 

JKP 

001002 

001001 

OCT 

000042 

001002 

S7 A 

TS1000 

001003 

LDA* 

T* 1 000 

OD 1 004 

ADD 

=•000317 

001005 

STA 

T 5 1 0 0 1 

001006 

CALI 

T 1011 

001007 

DAC 

T$ion i 


CALL T 10U (138) 

001010 

CALL 

TIOU 

001011 

DAC 

='000212 

CATL TNOUA (8 HPOLAP 

001012 

JMP 

oooooo 

001013 

OCT 

150317 
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HICROCONP TELECOMHONICATED DATA 
DDP-516 ASSEMBLY LISTING 


001014 

OCT 

146301 

001015 

OCT 

151240 

001016 

OCT 

120240 


STG 

001012 

001017 

CALL 

TNOUA 

001020 

DAC 

001013 

001021 

DAC 

-* 000010 

001022 

OCT 

000000 

CALL T 100 

(ARG(38) +207) 

001023 

LDA 

APG 

001024 

ADD 

001026 

001025 

J HP 

001027 

001026 

OCT 

000045 

001027 

STA 

TS1000 

001030 

L DA* 

TS1000 

001031 

ADD 

='000317 

001032 

STA 

T$ 100 1 

001033 

CALL 

tiou 

001034 

DAC 

TS1001 

CALL T 1 00 

(138) 

001035 

CALL 

T 100 

001036 

DAC 

='000212 

CALL TNOOA (8HBIAS , 

001037 

J HP 

000000 

001040 

OCT 

141311 

001041 

OCT 

140723 

001042 

OCT 

120240 

001043 

OCT 

120240 


STG 

001037 

001044 

CALL 

T NOHA 

001045 

DAC 

001040 

001046 

DAC 

= '000010 

001047 

OCT 

oooooo 

CALL FPOOTC (ARG (41) , 15 

001050 

LDA 

ARC 

001051 

ADD 

001053 

001052 

J!»P 

001054 

001053 

OCT 

000050 

001054 

STA 

TS1000 

001055 

CALL 

FPOUTC 

001056 

DAC* 

TS1000 

001057 

DAC 

= '000017 

001060 

DAC 

= • 000006 

001061 

OCT 

oooooo 


CALL TNOOA ( 2H ,2) 

001062 

CALL 

TNOOA 

001063 

DAC 

=' 120240 

001064 

DAC 

='000002 

001065 

OCT 

oooooo 

CALL FPOOTC (ARG (39) ,15 

001066 

LDA 

ARG 

001067 

ADD 

001071 

001070 

JHP 

001072 

001071 

OCT 

000046 

001072 

STA 

Tf 1000 

001073 

CALL 

FPOOTC 

001074 

DAC* 

T$1000 
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*TCROCO*P TaLECDIfirTNICATED DATA 
DDP-516 ASSEMBLY LISTING 
001076 DAC = '000017 

001076 DAC =' 000006 

001077 OCT 000000 

CALL ?NOOA(2H ,2) 

001 1 00 CALL T NOT! A 

001101 0 AC =' 120240 

001102 DAC ='000002 

001103 orr 000000 

CALI PPOUTC (ARG (55) , 16 , 6) 

001 104 L DA ARG 

001106 ADD 001107 

001106 JHP 001110 

001107 OCT 000066 

001110 STA T*1000 

001111 CALL FP0U7C 

001112 DAC* T $ 1 0 0 0 

001113 DAC ='000017 

001114 DAC ='000006 

001115 OCT 000000 

cm, TNOOA (2H ,2) 

001116 CALL T NOU A 

001117 DAC ='120240 

001120 DAC ='000002 

001121 OCT 000000 

CALL FPODTC (ARG (67) , 15, 6) 
00112? LP A ARG 

001123 ADD 001126 

0 n 1 1 2 4 7 * P 001126 

001 125 OCT 000070 

001176 STA T $ 1 0 00 

001 1 27 CALL FPOTJTC 

001130 DAC* Tf 1 000 

0011 31 DAC = *000017 

00 1 1,32 DAC =' 000006 

001133 OCT 000000 

CALL TlO{T (138) 

001 1 74 CALL T 1 00 

001135 DAC ='000212 

CAT I *"im* (8 HP ART , 8) 
001176 JMP 000000 

001137 OCT 150301 

001140 OCT 151324 

001141 OCT 120240 

001142 OCT 120240 

5 TO 001136 

001143 CALL TNOOA 

001144 DAC 001137 

001145 DAC ='000010 

001146 OCT 000000 

DO 60 T=43, 47, 2 
001147 LDA ='000053 

001150 Si'A I 

CALL FPOUTC (ARG (I) , 15, 6) 
001151 LDA I 

0011 52 ADD ARG 

001163 ADD 001155 

001154 J!*P 001156 
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MICROCOMP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


001155 

OCT 

177777 

001156 

STA 

T$ 1 000 

001157 

CALL 

PPOUTC 

001160 

DAC* 

TS1000 

001161 

DAC 

= • 000017 

001162 

DAC 

= *000006 

001161 

OCT 

oooooo 

6 0 CUL TNOUA (2H ,2) 

oomu 

CALL 

TNOUA 

001166 

DAC 

= • 120240 

001166 

DAC 

= ' 000002 

001167 

OCT 

oooooo 

001 170 

LDA 

I 

001171 

ADD 

=*000002 

onr? 

CAS 

=*000057 

001173 

U*P 

001176 

001174 

J«P 

001160 

001176 


001150 

CALL T 100 (138) 

001176 

CAT L 

Tion 

001177 

DAC 

='000212 

CAT t TNOUA (BN 

001200 

J"P 

oooooo 

001201 

OCT 

120240 

001707 

HOT 

120240 

001203 

OCT 

120240 

001204 

OCT 

120240 


STG 

001200 

001206 

CALL 

TNOUA 

001706 

DAC 

001201 

001707 

DAC 

='000010 

001210 

OCT 

oooooo 

on 

66 1= 

49,53,2 

001211 

LDA 

=*000061 

001212 

S m A 

I 

r a t 

L PPO'ITC (ARG (I) 

001217 

LDA 

I 

001214 

ADD 

A PO 

001215 

ADD 

001217 

001216 

JMP 

001220 

001217 

OCT 

177777 

001720 

S’ 1 ' A 

Tli 1000 

001221 

CALT 

PPOUTC 

001222 

DAC* 

Tt 1000 

001273 

DAC 

=*000017 

0 0 1 ° 7 4 

DAC 

='000006 

001226 

OCT 

oooooo 

65 CM! TNOUA (2U ,2) 

001276 

CALL 

TNOUA 

001227 

DAC 

=• 120240 

001230 

DAC 

=' 000002 

001231 

OC^ 

OOOOOO 

001232 

LDA 

I 

001233 

ADD 

= *000002 

001234 

CAS 

=*000065 

001275 

<7 HP 

001240 

001236 

J*P 

001212 
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WICBOCOMP TELECOMMUNICATED DATA 
DDP-51 6 ASSEMBLY LISTING 
001237 JMP 001212 

CALI. TIOt) (138) 

001240 CALL T10U 


001241 

DAC 

= * 0002 12 

CALL 

Tion (138) 

001242 

CALL 

T10U 

001243 

DAC 

='000212 

RETURN 


001244 

JMP* 

000000 

END 

3TG 

a * 000001 

001245 

ott 

000001 


STG 

= '000002 

001246 

OCT 

000002 


STG 

= • 000004 

001247 

D cT 

000004 


STG 

= » 000006 

001260 

OCT 

000006 

000003 

DAC 

ARC 

000004 

DAC 

MODE 

000000 

DAC 

TV CD A 


STG 

='000010 

001261 

OCT 

000010 

000034 

DAC 

.10 


STG 

T 

001262 

OCT 

004640 


STG 

=•000007 

001253 

OCT 

000007 

000000 

DAC 

F POUT C 


STG 

T* 1000 

001254 

Of~T 

012244 


STG 

= ' 120240 

001265 

on 

120240 

000000 

DAC 

Tion 


STG 

= '000212 

001256 

OCT 

000212 

000076 

DAC 

.20 


STG 

='000011 

001257 

OCT 

000011 


STG 

=•000015 

001260 

OCT 

000015 


STG 

='000017 

001261 

OCT 

000017 


STG 

=' 000000 

001262 

OCT 

000000 


STG 

='000012 

001 263 

OCT 

000012 

000313 

0 ft c 

. 35 


STG 

= ' 000300 

001264 

OCT 

000300 


STG 

T $ 1 00 1 

001265 

OCT 

012244 

000436 

DAC 

.40 

000000 

DAC 

OTJT100 

000626 

DAC 

• 65 


STG 

=•000317 

001266 

OCT 

000317 
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MICROCOMP TELECOM MU NIC AT ED DATA 
DDP-51 6 ASSEMBLY LISTING 



STG 

='000014 

001267 

OCT 

000014 

001164 

0 AC 

.60 


STG 

=♦00006? 

001270 

OCT 

00006? 


STG 

= '000067 

001271 

OCT 

000067 

001226 

DAC 

.66 


STG 

=♦000061 

00 1 272 

OCT 

000061 


STG 

=♦000066 

00127? 

«0 

OCT 

000066 
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PROGRAM NAME 
SOURCE: RE50 
BINARY: BRE50 

ENTRY POINTS (location): ICINIT (’3274), INPIP ('3347), 

INGYRO (’3410) 

GENERAL DESCRIPTION: 

The subroutine ICINIT will set up the gyro and PIP A interface to 
interrrupt the main program every 10 milliseconds. The first interrupt 
will be a PIPA interrupt and will occur when the PIPA counters have 20 
milliseconds of data in them. The next interrupt will be a gyro interrupt 
10 milliseconds later and will occur when the gyro counters have 20 
milliseconds of data in them. From then on every 10 milliseconds the 
interrupts will occur alternately. ICINIT will also read the initial interpol 
ator values of the gyros. 

The subroutine INPIP will read the 6 PIPA pulse counters and store 
them in the locations indicated by the listing with a scaling of 2 pulses. 
For example, an octal 000200 represents one pulse or 4 cm/ sec of AV. 

The subroutine INGYRO will read the 6 gyro pulse counters, subtract 

the old interpolator values, add the new interpolator values and store thern 

in the locations indicated by the listing. These are also scaled at 2 

“15 

pulses. For example, an octal 000200 represents one pulse or 7 x 2 
radians. 
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NICROCOHP TELECONHTJN ICATED DATA 
DDP-516 A5SEHBLY LISTING 


0001 



000? 



0003 

00000 

0 000000 

0004 

00001 

14 0047 

0005 

00002 

14 0057 

0006 

00003 

14 0077 

000? 

00004 

0 02 00224 

0008 

00005 

74 0077 

0009 

00006 

0 01 00005 

0010 

00007 

14 0027 

0011 

00010 

34 0207 

001? 

non ii 

0 01 00010 

001 1 

00012 

0400 56 

ooia 

0001 3 

14 0017 

0015 

00014 

0 35 00223 

0016 

00015 

14 0027 

0017 

00016 

34 0207 

0018 

00017 

0 01 00016 

0019 

00020 

0 12 00000 

0020 

00021 

0 01 00015 

0021 

00022 

14 0027 

0 9 2 2 

0 00 2 3 

14 0067 

0023 

00024 

0400 56 

002U 

00025 

14 0007 

0026 

00026. 

34 0307 

0026 

00027 

0 01 00026 

0027 



0028 

00030 

54 1307 

0029 

00031 

0 01 00030 

0030 

00032 

0 04 00430 

003 1 

00033 

54 1317 

00 3 2 

00034 

0 01 00033 

003? 

00036 

0 04 00431 

0 0-39 

O0036 

54 1327 

0 03 6 

00037 

C 01 00036 

0036 

00040 

0 04 00432 

oon 

0004 1 

54 1337 

0038 

00042 

0 01 00041 

00?9 

000 4 3 

0 04 00433 

0040 

00044 

54 1347 

0041 

00045 

0 01 00044 

0042 

00046 

0 04 00434 

0043 

00047 

54 1357 

00 4 4 

00050 

0 01 00047 

0046 

00051 

0 04 00435 

0 046 

00052 

-0 01 00000 

0047 



0048 



004? 



0060 



0061 



0052 

00053 

0 oooooo 

OOS 3 

00054 

54 1107 

0064 

00055 

0 01 00054 

0056 

00056 

141240 

0066 

00057 

0405 77 

0067 

00060 

0 04 00600 


SUBR 

ICIN IT 

REL 


ICIN DAC 

** 

OCP 

*47 

OCP 

•57 

OCP 

.77 

LDA 

= 95 

OTA 

* 77 

J HP 

*-1 

OCP 

*27 

SKS 

*207 

J HP 

*-1 

LRL 

18 

OCP 

•17 

LDX 

= -48 

WLUP OCP 

•27 

SKS 

•207 

JHP 


IRS 

0 

JHP 

WLUP 

OCP 

•27 

OCP 

• 67 

LRL 

18 

OCP 

•7 

SKS 

• 307 

JHP 

*-1 

* READ INITIAL INTERPOLATOR 

IN A 

•1307 

JHP 

*-1 

STA 

•430 

TNA 

• 1317 

JHP 


STA 

' 431 

INA 

•1327 

JHP 

*-1 

STA 

•432 

TNA 

• 1337 

JHP 

*-1 

STA 

• 433 

INA 

•1347 

JHP 

*-1 

STA 

•434 

INA 

*1357 

JHP 

*-1 

STA 

*435 

JHP* 

ICIN 

* 


* 


* 


SUBR 

INPIP 

REL 


I NPI DAC 


INA 

• 1 107 

JHP 

*~1 

ICR 


ARS 

1 

STA 

PIPA 


DISABLE GYRO 
DISABLE PIP 
RESET PRESET 

SET PPESET 

CLP & ENB CLOCK 
VA IT FOR PULSE 

WAIT 10 HICSEC. 

CLP AND ENABLE PIPA 

CLP 6 ENB CLOCK 
WAIT TOP PULSE 


WAIT FOR 22 

PIS ABIE CLOCK 
WATT IB HICSEC. 

ENAELF GYPO 

SKIP IF INTRPLTF REDY 

DATA 


OLD I NT PPPLT R DATA 
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MTCPOCOMP TELECOM fin NIC AT ED DATA 
DDP-516 ASSEMBLY LISTING 


005ft 

00061 

54 1117 


INA 

0059 

00062 

0 01 00061 


J HP 

0060 

00063 

141240 


ICP 

0061 

00064 

0405 77 


APS 

0062 

00065 

0 04 00602 


STA 

0063 

00066 

54 1127 


INA 

0064 

00067 

0 01 00066 


JHP 

0065 

00070 

141240 


ICR 

0 066 

00071 

0405 77 


APS 

0067 

00072 

0 04 00604 


STA 

0 0 6 R 

0007 3 

54 1137 


INA 

0060 

00074 

0 01 00073 


JMP 

0070 

00075 

141240 


TCP 

0071 

0 00 76 

0405 77 


APS 

0072 

00077 

0 04 00606 


STA 

0073 

00100 

54 1147 


INA 

0074 

00101 

0 01 00100 


JHP 

0076 

00102 

141240 


ICP 

0076 

00103 

0405 77 


APS 

0077 

00104 

0 04 00610 


STA 

0070 

00105 

54 1157 


INA 

0079 

00106 

0 01 00105 


J HP 

r ofto 

00107 

141240 


ICP 

008 1 

00110 

OUOR 77 


ARS 

0 082 

00111 

0 04 00612 


STA 

00R3 

00112 

14 0017 


OCP 

COB 4 

00119 

-0 01 00053 


JMP* 

ogbr 



* 


0086 



* 


0087 


000600 

PIPA 

FQH 

COftR 


000602 

PTPB 

EQU 

0089 


000604 

PIPC 

EQU 

0090 


000606 

PTPP 

FQO 

0091 


000610 

PIPE 

EQIT 

00°2 


000612 

PI PF 

EQU 

009 3 



★ 


0094 



★ 


0095 




SUBR 

0096 




RFL 

009' 7 



* 


0098 

00114 

0 000000 

INGY 

DAC 

00 Q 9 

0C115 

54 1007 


INA 

0100 

00 1 1 6 

0 01 00115 


JMP 

0101 

00117 

141240 


TCP 

010? 

00120 

0 07 00430 


SOB 

0103 

00121 

0 04 00400 


STA 

0104 

00 122 

54 1017 


INA 

01 06 

00123 

0 01 00122 


JMP 

0106 

00124 

141240 


ICP 

0107 

00125 

0 07 00431 


SOB 

0108 

09126 

0 04 00402 


STA 

0109 

00127 

54 1027 


INA 

0110 

00130 

0 01 00127 


JMP 

0111 

00131 

141240 


TCR 

0112 

00132 

0 07 00432 


SUB 

0113 

00133 

0 04 00404 


STA 

0114 

00134 

54 1037 


INA 


*1117 

*-1 

1 

PI PB 
*1127 

1 

PIPC 
*1137 
*- 1 

1 

PI PD 

• 1 147 
*-1 

1 

PIPE 
*1157 
*- 1 

1 

PI PF 

• 17 CI-EAP AND ENABLE 

IN PI 


*600 

PTPA+2 

PIPB + 2 

PIPC+2 

PIPD+2 

PTPE*2 


INGYRO 


♦ * 

* 1007 
*-1 

*430 
GYP A 
♦1017 
*- 1 

*431 

GYPB 

•1027 

*-1 

*432 
GY PC 
*1037 
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HICPOCO*P TFL ECO* RUNIC ATE!) DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0115 

00135 

0 01 00134 

J HP 

+- 1 

0H5 

00136 

141240 

ICR 


on 7 

0 013 7 

0 07 00433 

SUB 

* 4 3 3 

0110 

00140 

0 04 00406 

STA 

GYFD 

Olio 

00141 

54 1047 

INA 

*1047 

0120 

00142 

0 01 00141 

J HP 

*-1 

0121 

00143 

141240 

TCR 


0122 

00144 

0 07 00434 

SUB 

• 434 

012? 

00145 

0 04 00410 

STA 

GYRE 

01 24 

00146 

54 1057 

TNA 

* 1057 

0125 

0014* 7 

0 01 00146 

JHP 

*- 1 

0125 

00150 

141240 

ICR 


0127 

001 51 

0 07 00435 

SUB 

* 435 

0 1 ?P 

00152 

0 04 00412 

STA 

GYRE 

0120 

00153 

14 nro7 

OCP 

*7 

0130 



* READ INTERPOLATORS 

0171 

0 0 15 4 

14 0307 

SK5 

• 307 

0132 

00155 

0 01 00154 

JHP 

*-1 

01 3? 

00156 

54 1307 

INA 

• 1307 

013d 

00157 

0 01 00156 

JHP 

*-1 

0135 

00160 

0 04 004 30 

STA 

• 430 

0 1 7* 

00161 

0 06 00400 

ADD 

GYRA 

0137 

00162 

0405 77 

ARS 

1 

01 3 5 

0316? 

0 04 00400 

STA 

3 YP A 

013° 

00164 

54 1717 

TNA 

• 1317 

0 1 40 

00 165 

0 01 00164 

JHP 

*-1 

014 1 

00166 

0 04 00431 

STA 

*431 

014? 

00167 

0 06 00402 

ADD 

GYPB 

0147 

00 170 

0405 77 

ARS 

1 

014 4 

0017 1 

0 04 00402 

STA 

GYPB 

0145 

00172 

54 1327 

INA 

* 1327 

0145 

00173 

0 01 00172 

JHP 

*-1 

0147 

00174 

0 04 00432 

STA 

* 432 

0143 

00 1 75 

0 06 00404 

ADD 

GYPC 

014 0 

00176 

0405 77 

APS 

1 

0 150 

00177 

0 04 00404 

STA 

G YRC 

0151 

00200 

54 1737 

TNA 

* 1 337 

01*2 

00201 

0 01 00200 

JHP 

*-1 

0157 

00202 

0 04 00433 

STA 

• 433 

0154 

00207 

0 06 00406 

ADD 

GYRO 

015 5 

00204 

0405 77 

ARS 

1 

01** 

00?05 

0 04 00406 

STA 

gyrd 

0157 

00206 

54 1347 

INA 

* 1347 

0158 

00207 

0 01 00706 

JHP 

*-1 

015? 

0 0210 

0 04 00434 

STA 

' 434 

0150 

00211 

0 06 00410 

ADD 

GYRE 

0161 

00212 

040* 77 

ARS 

1 

016? 

00217 

0 04 00410 

STA 

GY PE 

0153 

00214 

54 1757 

INA 

♦ 1357 

0164 

00215 

0 01 00214 

JHP 

*-1 

0165 

002 16 

0 04 00435 

STA 

*435 

0166 

O0217 

0 06 00412 

ADD 

GYRE 

0167 

00720 

0405 77 

ARS 

1 

0 163 

O0 22 1 

0 04 00412 

STA 

GYRF 

0169 

00222 

-0 01 00114 

JHP* 

INGY 


01^0 * 

01^1 * 


CLEAR AND 


ENABLE 


96 



fix 

01 

01 

01 

01 

01 

01 

01 

01 


CROCOBP TELECOBNUNICATED DAT A 
DDP-516 ASSEMBLY LISTING 


72 


000400 

GYRA 

FQU 

1 400 

73 


000402 

GYRB 

EQO 

GYRA+2 

7U 


000404 

GYRC 

EQIJ 

GYRB+2 

75 


000406 

GYRD 

EOD 

GYRC+2 

76 


000410 

GYRE 

EOU 

GYFD+2 

77 


000412 

GYPF 

EQU 

GYRE+2 

7R 



* 



7S 

00223 

177720 


END 



00224 

000137 
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PROGRAM NAME 
SOURCE: ACOM 
BINARY: BACOM 

ENTRY POINTS (location): ACOM C3522) 
GENERAL DESCRIPTION: 


This subroutine compensates the accelerometers for scale factor, 
bias and two misalignments, SO and SP, expressed as misalignments toward 
the negative X, Y and Z axes. Considering just the A accelerometer, the 
following equations are programmed. 


where 


and 


then 


A A PC = A A PC + AABD + -4tAASF AAPC 


AAPC is accelerometer A's pulse count 
AAED is accelerometer A's bias 

g 

AASF is 2 X accelerometer A’s A scale factor 

AAPC = ~(DVXB AAMX + DVYB AAMY + DVZB AAMZ) 
2 9 


DVXB, DVYB, DVZB are the AV outputs in the body frame and 

0 x, y, z 

AAMX, Y, Z are 2 X accelerometer A’s misalignments in the negative X, 
Y, Z directions. See listing for coding. 
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KICROCOKP TELECOM HON ICfi TED DATA 



DDP- 

■516 

ASS 

lEtfBLY 

LISTING 


0001 





PEL 


0002 





SUBR 

Aeon 

0003 

00000 

0 

000000 

acok DP C 

** 

ooou 

00001 

0 

02 

00600 

LDA 

A A PC 

0005 

00002 

0 

16 

00700 

hpy 

A ASF 

000* 

00003 

000007 

DBL 


one' 

00004 

0401 

72 

LRS 

6 

00 00 

00005 

0 

06 

00706 

PAD 

AABD 

0009 

00006 

0 

06 

00600 

DAD 

A A PC 

0010 

00007 

0 

04 

00600 

DST 

A APC 

0011 

00010 

0 

02 

00602 

DLD 

A BPC 

0012 

0001 1 

0 

16 

00701 

KPY 

ABSF 

0013 

00012 

0401 

72 

LRS 

6 

com 

00013 

0 

06 

00710 

DAD 

ABBD 

0015 

00014 

0 

06 

00602 

DAD 

A B PC 

0016 

000 15 

0 

0 4 

00602 

DST 

ABPC 

0017 

00016 

0 

02 

00604 

DLD 

AC PC 

COIR 

0 0017 

0 

16 

00702 

SPY 

ACS F 

0 01° 

00020 

0401 

72 

LBS 

6 

0020 

00021 

0 

06 

00712 

DAD 

ACBD 

0021 

00022 

-0 

06 

00604 

DAD 

AC PC 

0022 

00023 

0 

0 4 

00604 

DST 

ACPC 

0023 

00024 

0 

0 ? 

00606 

DLD 

ADPC 

0024 

00025 

0 

16 

00703 

SPY 

ADSF 

0026 

00026 

0401 

72 

LBS 

6 

0 026 

00027 

0 

06 

007 14 

DAD 

ADBD 

0 C77 

00 0 3D 

0 

06 

00606 

DAD 

ADPC 

002R 

0 0 031 

0 

04 

00 6 06 

DST 

ADPC 

0020 

00 0 3 2 

0 

02 

0061 0 

DLD 

AEPC 

0030 

000 33 

0 

1 6 

00* T 04 

KPY 

MSS F 

0031 

0 0 0 3 4 

0401 

72 

IBS 

6 

003? 

00036 

0 

06 

00716 

DAD 

AEBD 

0039 

000.36 

0 

06 

0061 0 

DAD 

AEPC 

0030 

00037 

0 

04 

00610 

DST 

AEPC 

0 0 3 R 

00040 

0 

02 

00612 

DLD 

AF PC 

0036 

00041 

0 

1 6 

00705 

SPY 

APS F 

0037 

00042 

0401 

72 

LBS 

6 

001° 

D0043 

0 

06 

007 20 

DAD 

AFRD 

0039 

00044 

0 

06 

00612 

DAD 

AFPC 

0040 

00045 

0 

04 

00612 

DST 

AFPC 

004 1 

00046 

0 

02 

00614 

DLD 

DVXB 

0042 

00047 

0 

16 

00722 

SPY 

A ANX 

0043 

00050 

0 

04 

00156 

DST 

TACK 

0044 

00051 

9 

02 

006 14 

DLD 

DVXB 

0045 

00052 

0 

16 

00723 

SPY 

ABMX 

0046 

00053 

0 

04 

00170 

DST 

TBCM 

0047 

00054 

0 

02 

00614 

DLD 

DVXB 

0 049 

00055 

0 

16 

00724 

SPY 

ACMX 

0049 

00056 

0 

04 

00172 

DST 

TCCM 

005 0 

00057 

0 

02 

00614 

DLD 

DVXB 

0051 

00060 

0 

16 

00725 

SPY 

AD KX 

0 05? 

00061 

0 

04 

00174 

DST 

TDCK 

0053 

00062 

0 

02 

00614 

DLD 

DVXB 

0054 

00063 

0 

16 

00726 

SPY 

AEKX 

0055 

00064 

0 

04 

00176 

DST 

TECK 

0056 

00065 

0 

02 

006 14 

DLD 

DVXB 

0057 

00066 

0 

16 

00727 

SPY 

AFKX 
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005* 00067 

0069 00070 

0060 00071 

0061 00072 

0062 00071 
0061 00074 

0064 00075 

0065 00076 

0066 00077 

0067 00100 
006? 00101 
006° 00102 

0070 00101 

0071 00104 
007? 00105 
0071 00106 
0074 00107 
0D76 00110 

0076 00111 

0077 00112 
0079 00113 
0 07'7 00114 

oo?o onn* 

0091 00116 
008? 00117 
0081 00120 

0084 00121 

0085 00122 

0086 00121 
0087 00124 
0 CRB 00125 

0089 00126 

0090 00127 
00° 1 00130 
009? 00111 

0093 00132 

0094 00133 

0095 00134 

0096 00135 

0097 00136 
009? 00137 
0 0 Q 9 00140 

0100 00141 

0101 00142 

0102 00*41 
010? 00144 

0104 00145 

0105 00146 

0106 00147 

0107 00160 

010? 00151 
010° 00152 

0110 00151 

0111 00154 

0112 00155 

0113 00156 

0114 00167 


0 

04 

00200 

0 

02 

00616 

0 

16 

00710 

0 

06 

00166 

0 

04 

00166 

0 

02 

00616 

0 

16 

00731 

0 

06 

00170 

0 

04 

00170 

0 

02 

00616 

0 

16 

00732 

0 

06 

00172 

0 

04 

00172 

0 

02 

00616 

0 

16 

00733 

0 

06 

00174 

0 

04 

00174 

0 

02 

00616 

0 

16 

00734 

0 

06 

00176 

0 

04 

00176 

0 

02 

00616 

0 

16 

00735 

0 

06 

00200 

0 

04 

00200 

0 

02 

00620 

0 

16 

00736 

0 

06 

00166 

0 401 

67 

0 

06 

00 600 

0 

04 

00600 

0 

02 

00620 

0 

16 

00737 

0 

06 

00170 

0401 

67 

0 

06 

00602 

0 

04 

00602 

0 

02 

00620 

0 

16 

00740 

0 

06 

00172 

0401 

67 

0 

06 

00604 

0 

04 

00604 

0 

02 

00620 

0 

16 

00741 

0 

06 

001^4 

0401 

67 

0 

06 

00606 

0 

04 

00606 

0 

02 

00620 

0 

16 

00742 

0 

06 

00176 

0401 

67 

0 

06 

00610 

0 

04 

00610 

0 

02 

00620 

0 

16 

00743 


TFCH 
DLD DVYB 
HPY ARMY 
DAD TACH 
D ST TACH 
DLD DVYB 
HPY ABHY 
DAD TBCH 
DST TBCH 
DLD DVYB 
HPY ACHY 
DAD TCCN 
DST TCCH 
DLD DVYB 
HPY ADHY 
DAD TDCH 
DST TDCH 
DLD DVYB 
HPY AEHY 
DAD TECH 
DST TECH 
DLD DVYB 
HPY APHY 
DAD TFCH 
DST TFCH 
DLD DVZB 
MPY AA HZ 
DAD TACH 
LRS 9 
DAD A APC 

DST A A PC 
DLD DVZB 
PIPY AB HZ 
DAD TBCH 
LRS 9 
DAD ABPC 
DST ABPC 
DLD DVZB 
HPY AC HZ 

DAD TCCH 
LRS 9 
DAD ACPC 
DST ACPC 
DLD DVZB 
HPY AD HZ 
DAD TDCH 
LRS 9 
DAD A DPC 

DST A DPC 

DLD DVZB 
HPY AE HZ 
DAD TECH 
LRS 9 
DAD AEPC 
DST AEPC 
DLD DV Z B 

HPY AFMZ 


HICPOCOMP TELECOHHONIC ATED DATA 
DDP-516 ASSEKBLY LISTING 

DST 
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MTCFOCOMP TF1 ECOMMONICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0115 

00160 

0 06 00200 


DAD 

TFCM 

01 16 

0016 1 

0401 67 


T,RS 

ft 

0 117 

00162 

0 06 00612 


DAD 

AFPC 

01 IB 

0 016 3 

1) 0 4 00612 


DST 

AFPC 

01 1 a 

00 164 

000005 


SGL 


O1?0 

00165 

-0 01 00000 


JMP* 

ACOM 

0121 


000600 

A A PC 

E 00 

*600 

012? 


000602 

A BPC 

EOO 

A A PC + 2 

012'' 


000604 

A CPC 

son 

A A PC *4 

0124 


000606 

A DPC 

eon 

A A P C * 6 

0125 


000610 

A EPC 

f on 

A A PC* 8 

0126 


000612 

AFPC 

FQU 

AAPC*10 

012^ 


000700 

A ASF 

EQT7 

•700 

0125 


000701 

A BSP 

EQO 

AASF+1 

0120 


000702 

ACSF 

EOF 

A ASF *-2 

0130 


000703 

ADSF 

EO II 

AASFf3 

0131 


000704 

AFSP 

F0O 

AASF+4 

0132 


000705 

AFSF 

f on 

AASP*S 

0133 


000706 

A A BD 

FOII 

*706 

0134 


000710 

AFBD 

non 

AARD+2 

0135 


000712 

ACBD 

Eon 

AABD+4 

0136 


000714 

ADBD 

EQ1J 

AABD+6 

0137 


000716 

AFBD 

EOF 

A A. B D * R 

oi 3ft 


000720 

AFBD 

Epn 

AAR 0*10 

0130 


000722 

A A M X 

Eon 

1722 

0140 


000773 

A BMX 

EDIT 

A A M X + 1 

0141 


000724 

ACMX 

E on 

A A MX*- 2 

014? 


000725 

AD MX 

fqo 

A A MX + 3 

0143 


000726 

A EM X 

EOtT 

A A MX+4 

0144 


000727 

AFMX 

Eon 

A A MX + 5 

0145 


000730 

A A MY 

Eon 

A A MX* 6 

0146 


0 0 07 3 1 

AFMY 

eon 

AAMX+7 

0147 


000732 

ACM Y 

Eon 

A A MX* 8 

0140 


0007?3 

AD MV 

EQU 

A A MX* ft 

01 40 


0007 34 

A EM Y 

EOF 

A A MX* 1 0 

0150 


000735 

AFMY 

EQO 

A A MX + 1 1 

0151 


0 0 0 7 ft 6 

A A MX 

Eon 

A A "X* 1 2 

016? 


000737 

A BMZ 

EQU 

A A M X + 1 3 

0153 


000740 

AC M X 

Eon 

A A MX* 1 4 

0154 


000741 

A DM7, 

Eon 

A A MX * 1 5 

0 155 


000742 

AEMZ 

EOn 

A A MX* 1 6 

0156 


O00743 

AFMZ 

EQU 

A A M X + 1 7 

0157 


000614 

DVXB 

RQH 

*614 

0158 


000616 

DVYB 

EQU 

DVX B*2 

0 150 


000620 

DVZB 

EQU 

DVXB+4 

01 60 

00166 

oooooo 

T ACM 

DB° 

0 


00167 

000000 




0161 

00170 

oooooo 

TBCM 

DBP 

0 


00171 

oooooo 




0162 

00172 

oooooo 

TCCM 

DBP 

0 


00^73 

oooooo 




0163 

00174 

oooooo 

TDCM 

DBF 

0 


00175 

oooooo 




0164 

00176 

oooooo 

TFCM 

DBP 

0 


00177 

oooooo 




0165 

00200 

oooooo 

TFCM 

DBP 

0 


00201 

oooooo 
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MI 

01 


C°nC0^P TELSCOMNUNICATEP DATA 
DDP-516 ASSEMBLY LISTING 
66 END 
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PROGRAM NAME 
SOURCE: GCOM 
BINARY: BGCOM 

ENTRY POINT (location): GCOM (’3724) 
GENERAL DESCRIPTION: 


This subroutine compensates the gyros for ±ASF, NBD, ADIA, ADO A, 
ADSRA, major compliance, GO,- GS and OA coupling (by calling the OA 
coupling compensation subroutine, DCO A). Considering just the A gyro its 
compensation parameters are: 

GANS = 2 6 X gyro A negative ASF 
GAPS = 2 6 X gyro A positive ASF 
GABD = gyro A's NBD 

AD AX, Y,Z = 2 12 x Acceleration dependent 
drifts of gyro A for 
accelerations on the 
X, Y and Z axes 
(a function of ADIA, OA, SRA) 

AASD = 2 x A gyro acceleration 

squared drift or major 
compliance 

GAMX, Y, Z = 2 10 x gyro A’s misalignment 
along the negative X, Y 
and Z axes (functions 
of GO and GS). 

For the A gyro the following equations are implemented. 

GAPS 

GAPC = GAPC + GABD + “GAPC or 

2 GANS 


where GAPC is Gyro A's pulse count 

GAPC = -^(ADAX DVXB + ADAY DVYB + ADAZ DVZB) 

2 12 

where DVXB, DVYB and DVZB are the accelerations (in units of AV x ^ z 
per update). 
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GAPC = GAPC + — 4-(DVZB DVZB - DVXB DVXB - DVXB DVZB) AASD 
2 

where the parenthesized expression is proportional to DVAIA BVASRA, 
the product of the accelerations on A gyros l A and SR A. 

CALL DCOA (see documentation for subroutine DC50) 


GAPC = GAPC + — j-fdGAMX DTXB + GAMY DTYB + GAMZ DTZB) 

2 1U 

where DTXB, DTYB and DTZB are A0 , A0 and AO during the last update. 

x y a 

(Note, since ACOM is the subroutine which compensates the accelerometers 
and is a little simpler, it might be better to read its documentation first). 
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MTCPOCOMP telecommunicated data 
nnp~516 ASSEMBLY listing 


0001 

ooo? 

ooo^ oonoo 

000U 00001 

coos 00002 

0006 00003 
0003 oooou 

ono« 00005 

0009 00006 

0010 00007 

0011 00010 
0012 00011 

0013 00012 

0014 00013 

001 5 00014 

0016 00015 
oor 7 00016 

00 IP. 00017 

0019 00020 

0020 00021 
0021 00022 

0022 00023 

0023 00024 

0024 00025 
0026 00026 

0026 00027 

0027 00030 

0028 00031 

0029 00032 

0030 00033 

0031 00034 
00.32 00035 

0033 00036 

0034 0O037 

0035 00040 

0036 00041 

0037 00042 
0930 00043 
0Q3 n 00044 

0040 90046 

0041 00046 

0042 00047 

0043 00050 

0044 00051 

0045 00052 

0046 00053 

0047 00054 
O0U» 00055 
0 04 00056 
0060 00057 
0051 00060 

0052 00061 

0053 00062 

0054 00063 

0055 00064 

0056 00066 
0067 00066 


n oooono 

0 02 00400 
000007 
101400 
0 01 00007 
0 16 00506 
1 00000 
0 16 00500 
0401 7? 

0 06 00514 
0 06 00400 
0 04 00400 
0 02 00402 
101400 
0 01 00021 
0 16 00507 
100000 
0 16 00501 
0401 72 
0 06 00516 
0 06 00402 
0 04 00402 
0 02 00404 
101400 
0 01 00033 
0 16 00510 
1 00000 
0 16 00502 
0401 72 
0 06 00520 
0 06 00404 
o 04 00404 
0 02 00406 
101400 
0 01 00045 
0 16 00511 

loonoo 

0 16 00503 
0401 72 
0 06 00522 
0 06 00406 
0 04 00 4 06 

0 02 00410 

1 01400 

0 01 00057 
0 16 00512 
100000 
0 16 00504 
0401 72 
0 06 00524 
0 06 00410 
0 04 00410 
0 02 00412 
101400 
0 01 00071 


RFL 

SUBR GCOM 
DAC ** 
T.DA G A PC 
DBL 
SMI 

JMP * + 3 

MPY G A NS 

SKP 

MPY GAPS 
LRS 6 
DAD GABD 
PAD GA PC 
D ST G A PC 

DLD GBPC 
SMI 

JMP *+3 
MPY G B NS 

SKP 

MPY GBPS 
LRS 6 
DAD GBBD 
DAD GBPC 
D ST GBPC 

DLD GCPC 
SMI 

JMP *+ 3 

MPY GCNS 
SKP 

MPY GC PS 

IPS 6 
DAD GCBD 
DAD GCPC 
D ST GCPC 
DLD GDPC 
SMI 

JMP * + 3 

MPY GDNS 
SKP 

MPY GDPS 
L PS 6 
DAD GDBD 
DAD GDPC 
D ST GDPC 
DLD GEPC 
SMI 

JMP *♦ 3 
MPY GENS 
SKP 

MPY GBPS 
LRS 6 
DAD GEBD 
DAD GEPC 
DST GEPC 
DLD GFPC 
SMI 

JMP *+3 
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1TCP0C0MP TELECOM M7 NIC AT ED DATA 



DPP- 

516 

ASS 

:EMBLY 

LISTING 


on 58 

00067 

0 

16 

00513 

MPY 

GFNS 

0050 

00070 

100000 

SKP 


0060 

00071 

0 

16 

00505 

MPY 

G F PS 

OOF 1 

00072 

0401 

72 

IPS 

6 

0062 

0007 3 

0 

06 

00526 

DAD 

GFPD 

0 06.1 

00074 

0 

06 

00412 

DAD 

GFPC 

C064 

00075 

0 

04 

00412 

PST 

GF PC 

0061 

00076 

0 

02 

00614 

DID 

DVXB 

0066 

00077 

0 

16 

00530 

MPY 

ADAX 

0067 

00100 

0 

04 

00450 

DST 

T ACM 

006? 

00101 

n 

02 

00614 

DLD 

DVXB 

0 06^ 

00102 

0 

16 

00531 

MPY 

ADBX 

0070 

00 103 

0 

04 

00452 

DST 

TBCM 

00 7 1 

00 104 

0 

02 

00614 

DLD 

DVXB 

00 7 2 

0 010 6 

0 

16 

00532 

MPY 

ADCX 

0 07 T 

00106 

0 

04 

00454 

DST 

TCCM 

007U 

00 107 

0 

02 

00614 

DLD 

DVXB 

0 076 

00110 

0 

16 

00533 

MPY 

ADDX 

0076 

00111 

0 

04 

00456 

PST 

TDCM 

0 07 7 

00112 

o 

02 

00614 

DLD 

DVXB 

o 078 

0011 3 

0 

16 

00534 

MPY 

ADF X 

OO 77 

ooi m 

0 

0 4 

00 4 60 

PST 

TFCM 

ooao 

00115 

0 

02 

00614 

DLD 

DVXB 

0 OP 1 

001 16 

0 

1 6 

00535 

MPY 

ADFX 

roo2 

00 1 17 

0 

04 

00462 

DST 

TFCM 

OOP? 

00120 

0 

02 

006 16 

DLD 

DVYB 

00R4 

0012 1 

0 

16 

00536 

MPY 

APAY 

OOPP 

00127 

0 

OF 

00450 

DAD 

T ACM 

o O^f. 

0012 3 

0 

OU 

00450 

PST 

TACM 

OOP 7 

00124 

0 

02 

00616 

DLD 

DVY 3 

OOPS 

00126 

0 

16 

00537 

MPY 

AD BY 

008° 

00126 

0 

06 

00452 

PAD 

TBCM 

0090 

00127 

0 

04 

00452 

DST 

TPCM 

00°1 

001 10 

0 

02 

006 16 

DI.D 

DVYB 

0092 

00131 

0 

16 

00540 

MPY 

ADC Y 

nop? 

00 1 3? 

0 

06 

00454 

DAD 

TCCM 

0094 

00133 

0 

04 

00454 

DST 

TCCM 

0096 

00134 

0 

02 

00616 

DLD 

DVYB 

0096 

00135 

0 

16 

00541 

MPY 

ADDY 

OOP 7 

0 013 6 

0 

06 

00 4 56 

DAD 

TDCM 

0098 

001 37 

0 

04 

00456 

DST 

TDCM 

0009 

00140 

0 

02 

00616 

DLD 

DVYB 

0100 

0014 1 

0 

16 

00542 

MPY 

ADEY 

0101 

00142 

0 

06 

00460 

DAD 

TECM 

0102 

00 14? 

0 

04 

00460 

DST 

TECM 

010? 

n n 1 4 

9 

02 

006 36 

DID 

DVYB 

0104 

00 14 r ' 

.-N 

16 

00543 

KPI 

ADF Y 

0106 

0014 6 

0 

0 6 

00462 

DAD 

TFCM 

01 06 

00147 

0 

04 

00462 

DST 

TFCM 

0107 

00150 

0 

02 

00620 

DLD 

DVZB 

01 OP 

00151 

0 

16 

00544 

MPY 

ADAZ 

0109 

00152 

0 

06 

00450 

DAD 

TACM 

01 10 

00153 

0401 

64 

L PS 

12 

0111 

00 1 54 

0 

06 

00400 

DAD 

G A PC 

oil 2 

00166 

0 

04 

00400 

DST 

GAPC 

01 13 

00156 

0 

02 

00620 

DLD 

DVZB 

Oil 4 

00157 

0 

16 

00545 

MPY 

ADBZ 
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MTCEOCOMP TELECOM MD NTC AT ED DATA 



D DP- 

516 

ASSEMBLY 

LISTING 


011 s 

00160 

0 

06 

00452 

DAD 

TBCM 

Oils 

00161 

0401 

64 

LRS 

12 

011*7 

00162 

0 

06 

00402 

DAD 

GBPC 

Oils 

0 016 3 

0 

04 

00402 

DST 

GBPC 

Oil 9 

00164 

0 

02 

00620 

DLD 

DVZB 

0120 

00165 

0 

16 

00546 

MPY 

ADCZ 

0121 

00166 

0 

06 

00454 

DAD 

TCCM 

0122 

00167 

0401 

64 

LRS 

12 

0123 

00170 

0 

06 

00404 

DAD 

GCPC 

0124 

00171 

0 

04 

00404 

D ST 

GCPC 

012^ 

00172 

0 

02 

00620 

DLD 

DVZB 

0126 

00173 

0 

16 

00547 

MPY 

ADDS 

0127 

00174 

0 

06 

00456 

DAD 

TDCN 

0129 

00175 

0401 

64 

LRS 

12 

012° 

00176 

0 

06 

00 4 06 

DAD 

GDPC 

0130 

00177 

0 

04 

00406 

D ST 

GD PC 

0131 

00200 

0 

02 

00620 

DLD 

DVZB 

0132 

00201 

0 

16 

00550 

MPY 

ADEZ 

0133 

00202 

0 

06 

00460 

DAD 

TECH 

0134 

00203 

0 401 

64 

LRS 

12 

01 3 S 

00 2 04 

0 

06 

00410 

DAD 

GEPC 

0136 

00205 

0 

04 

00410 

D ST 

G E PC 

0197 

00206 

0 

02 

00620 

D7, D 

DVZB 

013? 

00 20 7 

0 

16 

00 551 

MPY 

ADFZ 

0139 

002 10 

0 

06 

00462 

DAD 

TECM 

0140 

00211 

0401 

64 

LRS 

12 

0141 

00212 

0 

06 

004 12 

DAD 

GFPC 

0 14? 

0021 3 

0 

04 

00412 

DST 

GFPC 

0143 

002 14 

0 

02 

00614 

DLD 

DVXB 

0 1 44 

00215 

0 

16 

00614 

MPY 

DVXB 

0145 

00216 

0 

04 

00434 

DST 

XS 00 

0146 

00217 

0 

02 

00616 

DLD 

DVYB 

0147 

00220 

0 

16 

00616 

MPY 

DTYB 

0144 

00221 

0 

04 

00436 

DST 

YSOD 

0149 

00222 

0 

02 

00620 

DLD 

DVZB 

0150 

00221 

0 

16 

00620 

MPY 

DVZB 

01S1 

0 02 24 

0 

04 

00440 

DST 

ZSQU 

0152 

00225 

0 

02 

00614 

DLD 

DVXB 

0153 

00226 

0 

16 

00616 

MPY 

DVYB 

0154 

00227 

0 

04 

00442 

DST 

XHHY 

0155 

00230 

0 

02 

006 14 

DLD 

DVXB 

0155 

00231 

0 

16 

00620 

MPY 

DVZB 

0157 

00232 

0 

04 

00444 

DST 

XZ EE 

0 153 

00233 

0 

02 

00616 

DLD 

DVYB 

0159 

00234 

0 

16 

00620 

MPY 

DVZB 

0160 

002 35 

0 

04 

00446 

DST 

YZEE 

0161 

00236 

0 

02 

00440 

DLD 

zsoo 

0162 

00237 

0 

07 

00434 

D SB 

xson 

016 3 

00240 

0 

07 

00444 

DS8 

XZ EE 

0164 

00241 

0 

16 

00422 

MPY 

AASD 

0166 

00242 

0401 

72 

LPS 

6 

0 166 

00 24 3 

0 

06 

00400 

DAD 

G A PC 

0167 

00244 

0 

04 

00400 

DST 

GAPC 

0169 

00245 

0 

02 

00440 

DLD 

7SQ0 

0169 

00246 

0 

07 

004 34 

DSB 

XSQO 

0170 

00247 

0 

06 

00444 

DAD 

XZEE 

0171 

00250 

0 

16 

00423 

MPY 

BAS D 
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MICPOCOMP TELECOMMUNICAT ED DATA 



D DP- 

516 

ASSEMBLY 

LISTING 


0172 

0025 1 

0401 

72 

LFS 

6 

0173 

00252 

0 

06 

00402 

DAD 

GBPC 

0 1 7 '4 

00253 

0 

04 

00402 

DST 

GBPC 

0175 

00254 

0 

02 

00434 

DID 

XSQU 

0175 

00255 

0 

07 

00436 

DSB 

YSOU 

0177 

00256 

0 

07 

00442 

DSB 

XWHY 

0173 

00257 

0 

16 

00424 

MPY 

CASD 

0177 

00260 

0401 

72 

LFS 

6 

oiRn 

00261 

0 

06 

00404 

DAD 

GCPC 

0181 

00262 

0 

04 

00404 

DST 

GCPC 

018? 

00263 

0 

02 

00434 

DLD 

XSQU 

0183 

00264 

0 

07 

00436 

DSB 

YSOU 

01 RU 

00265 

0 

06 

00442 

ADD 

XWHY 

0 1 R 5 

00266 

0 

16 

00425 

MPY 

DASD 

0185 

00267 

0401 

72 

LRS 

6 

0187 

00270 

0 

06 

00406 

DAD 

GD PC 

0188 

00271 

0 

04 

00406 

DST 

GDPC 

01R8 

00272 

0 

02 

00436 

DLD 

YSOU 

01^0 

00273 

0 

07 

00440 

DSB 

zsou 

0171 

00274 

0 

07 

00446 

DSB 

YZEE 

019? 

00275 

0 

16 

00426 

MPY 

EASD 

01Q8 

9 0276 

0401 

72 

LFS 

6 

9 194 

00277 

0 

06 

00410 

DAD 

GEPC 

0195 

00.100 

0 

04 

00410 

DST 

GE PC 

01 95 

00301 

0 

02 

00436 

DLD 

YSOU 

0197 

00 30 2 

0 

07 

00440 

DSB 

zsou 

0198 

00303 

0 

06 

00446 

ADD 

YZEE 

n 199 

00304 

0 

16 

00427 

MPY 

FASD 

0200 

00.305 

0401 

72 

LRS 

6 

0201 

00 30 6 

0 

06 

00412 

DAD 

GFPC 

0202 

00307 

0 

04 

00412 

DST 

GFPC 

0209 

00310 

000005 

SGL 


02 04 

00311 

0 

10 

00000 

CALL 

DCOA 

0? 05 

00312 

000007 

DBL 


070* 

00318 

0 

02 

00414 

DLD 

DTXB 

0207 

00314 

0 

16 

00552 

MPY 

GAMX 

0308 

003 15 

0 

04 

00450 

DST 

T ACM 

0209 

00316 

0 

02 

00414 

DLD 

DTXB 

0210 

00317 

0 

16 

00553 

MPY 

GBMX 

0211 

00.320 

0 

04 

00452 

DST 

TBCM 

0212 

00^21 

0 

0 2 

00414 

DLD 

DTXB 

0213 

00322 

0 

16 

00554 

MPY 

GC MX 

0219 

00323 

0 

04 

00454 

DST 

TCCM 

0? 1 5 

00324 

0 

02 

00414 

DLD 

DTXB 

0215 

00325 

0 

16 

00555 

MPY 

GDMX 

02 17 

00326 

0 

04 

00456 

DST 

TDCM 

02 1 8 

00927 

0 

02 

00414 

DLD 

DTXB 

0219 

00 ? 3 0 

0 

16 

00556 

MPY 

GFMX 

0220 

009 31 

0 

04 

00460 

DST 

TFCM 

0221 

00332 

0 

02 

00414 

DLD 

DTXB 

0222 

00 9 3 3 

0 

16 

00557 

MPY 

GFMX 

022.3 

00334 

0 

04 

00462 

DST 

TFCM 

0224 

00335 

0 

02 

00416 

DLD 

DTYB 

0225 

00336 

0 

16 

00560 

MPY 

GAMY 

0228 

00337 

0 

06 

00450 

DAD 

TACM 

0227 

003 40 

0 

04 

00450 

DST 

TACN 

02?R 

00341 

0 

02 

00416 

DLD 

DTYB 
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"'TCBCCOilP TELECO"'*TJ NT CAT FP DATA 



DD T> - 

216 

A5 ? 

FNPIY 

LISTING 


0227 

00742 

0 

16 

00661 

**PY 

OB*Y 

02.10 

0 0 3 4 3 

0 

06 

00452 

PAP 

TBCB 

02 31 

00 344 

0 

0 4 

00452 

PST 

TBCM 

0232 

0 0 3 45 

0 

02 

OOU 16 

DLD 

DT Y B 

0233 

00346 

0 

16 

00562 

flPY 

OCMY 

02 3b 

00347 

0 

06 

00464 

DAP 

TCCfl 

02 35 

00 360 

n 

04 

00454 

PST 

TCC?1 

0 2 30 

00 361 

0 

02 

004 16 

DLD 

DTYB 

023*? 

00352 

0 

16 

00563 

MPY 

GPMY 

03 3 2 

00357 

0 

06 

00 4 56 

PAD 

TDCM 

0 2 33 

00 354 

0 

04 

00456 

D ST 

TPCfl 

0 ?ao 

0075^ 

0 

02 

00416 

DIP 

DTYB 

0241 

00 356 

0 

16 

00564 

MPY 

GEEY 

(V>/i 2 

0 0 7 2 7 

0 

06 

00460 

PAD 

TECd 

0343 

00160 

0 

04 

00460 

PST 

TEC'"' 

02(1 4 

00 3 61 

0 

0 2 

004 16 

DLD 

DTYB 

0 24 2 

00 367 

0 

16 

00565 

^ P Y 

OF BY 

"2 4 6 

0 0 3 6 3 

0 

06 

00462 

PAD 

TFC*1 

0247 

00364 

0 

04 

00462 

PST 

TFCM 

0? 4 n 

00 3 65 

0 

02 

00420 

PIP 

PTZB 

0 24 1 

00366 

0 

16 

00566 

«PY 

OMZ 

0 2 20 

00767 

0 

06 

00450 

DA D 

TAC1 

0221 

(70 770 

0401 

66 

IPS 

10 

0 2 S2 

00371 

0 

06 

00400 

PAD 

GA PC 

03 2 7 

0037? 

0 

0 4 

00400 

pst 

G A PC 

02 2!) 

00777 

0 

02 

00420 

DLD 

PT7B 

0 7 2 

00374 

0 

1 6 

00567 

!“!P V 

GPB2 

0256 

00 172 

0 

06 

00452 

PAD 

TBCfl 

ro s? 

00176 

04 01 

66 

IPS 

10 

02 SP 

00377 

0 

06 

00402 

DAP 

GBPC 

0?2o 

00400 

0 

04 

00402 

PST 

GBPC 

07 6(1 

00401 

0 

0 2 

00420 

PIP 

DT7.B 

0261 

00402 

0 

16 

00570 

YPY 

r^C M7 

072? 

0040? 

0 

06 

004 54 

PAD 

TP (7*1 

0263 

00 4 0 4 

0 401 

66 

LRS 

10 

0264 

0040 r 

0 

06 

00404 

DAD 

GCPC 

0266 

00406 

0 

04 

00404 

PST 

GC PC 

02 66 

00 4 07 

0 

02 

00420 

DLD 

PT7B 

0267 

004 10 

0 

16 

00571 

*PY 

op * T 

n 2 6« 

0 0 4 1 1 

0 

06 

00 4 56 

PAD 

TPC* 

0 26 0 

00412 

0401 

66 

IPS 

10 

0770 

0041 3 

0 

0 2 

004 06 

DA D 

GDPC 

0271 

004 14 

0 

04 

00406 

PST 

GDPC 

027? 

0 0 415 

0 

0 2 

00420 

DID 

PT7. B 

0271 

O 0 4 1 6 

0 

16 

0057? 

1PY 

GF MT 

0274 

00417 

0 

06 

00460 

PAD 

TEC* 

0272 

00420 

0401 

6 6 

IRS 

10 

0776 

00421 

0 

06 

004 10 

PAP 

OF PC 

0277 

00422 

0 

04 

00410 

PST 

OF r C 

r) O "rq 

00423 

0 

02 

00420 

DT D 

TJTZn 

0 2 7 C 

nou?4 

0 

16 

00573 

*PY 

GFTZ 

0 7 00 

00472 

0 

Of 

nnuf 2 

DAP 

T FC" 

020 1 

00426 

040 1 

66 

IPS 

10 

0762 

0 0 4 2 17 

0 

06 

00412 

PAD 

GF r C 

0 7R 3 

00430 

0 

04 

00412 

PST 

GF PC 

0264 

004 3 1 

000005 

SGI 


0?«2 

00432 

-0 

01 

00000 

JFP* 

ocn* 
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"TCFOCOHP TELECOM KUNICATED DATA 



DDP-516 ASSEKBLY 

LISTING 


0286 

000400 

GAPC EQO 

•400 

0287 

000402 

GBPC EQO 

GAPC+2 

0288 

000404 

GCPC EQO 

GAPC+4 

0280 

000406 

GDPC EQO 

GAPC+6 

0290 

000410 

GEPC EQO 

GAPC+8 

02 q 1 

000412 

G* PC EQO 

GAPCMO 

0292 

000500 

GAPS EQO 

• 500 

0293 

000501 

GBPS EQO 

GAPS+1 

0294 

000502 

GCPS EQO 

GAPS +2 

0295 

000503 

GDPS EQO 

GAPS+3 

0296 

000504 

GEPS EQO 

GAPS +4 

02 q "» 

000505 

GEP5 EQO 

GAPS+5 

0?op 

000506 

GANS EQO 

GAPS +6 

029 q 

00050' 7 

GBNS EQU 

GAPS+7 

0800 

0005 10 

GCNS EDO 

GAPS 4-8 

0.8 0 1 

000511 

GDNS EQO 

GAPS+9 

090? 

000512 

GENS EQO 

GAPS+10 

0 80 8 

000513 

GFNS EDO 

GAPS+1 1 

O10U 

000514 

GABD EQO 

* 514 

0 305 

000816 

GBBD EQO 

GABD+2 

0806 

000520 

GCBD EQO 

GA R D + 4 

0307 

000522 

GDBD EOO 

GABD+6 

0309 

000524 

GFBD EQO 

GABD+8 

0809 

000576 

GFBD EQO 

GABD+10 

0310 

000530 

AD AX EQO 

• 530 

031 1 

000531 

A DB X BOO 

ADAX+1 

0312 

000532 

ADCX EQO 

ADAX+2 

0318 

0005^3 

ADDX EOO 

ADAX+3 

0314 

000534 

ADEX EOO 

ADAX+4 

0 315 

000535 

ADFX EQO 

ADAX+5 

03 1 ^ 

000596 

ADA? EQO 

AD AX +6 

0317 

CO 05 .37 

A DB? EQO 

AD AX* 7 

0318 

000540 

ADC? EQO 

ADAX+8 

0319 

000541 

ADDY EQO 

ADAX+9 

0370 

000542 

ADSY EQO 

ADAX+10 

032 1 

000543 

A DF Y EQO 

ADAX+1 1 

0322 

000544 

A DAZ EQO 

AD AX ♦ 1 2 

0323 

000545 

ADBZ EQO 

ADAX+13 

0324 

000546 

A DC 7 EQO 

ADAX+14 

0325 

000547 

ADD7 EQO 

A D A X * 1 5 

0326 

000550 

ADF7 EQU 

ADAX+16 

0327 

000551 

ADFZ EQO 

ADAX+17 

0328 

000552 

GAMX EQO 

* 552 

0 32° 

000553 

GBNX EQO 

GAP5X+1 

0330 

000554 

GCHX EQO 

GAHX + 2 

03 31 

000555 

GDNX EQO 

GA«X*3 

0332 

000556 

GEBX EOO 

GA!"X + 4 

0 3 33 

000557 

GF«X EQO 

GA FlX+5 

0334 

000560 

GA*1Y EQU 

GAMX + 6 

0935 

000561 

GBWY EQO 

GAFX+7 

013 6 

000562 

GCMY EQO 

GAMX+8 

0337 

000563 

6D1JY EQO 

GAflX+9 

0338 

000564 

GEBY EQO 

GAWX+10 

0339 

000565 

GFHY EQU 

GAflX+11 

0340 

000566 

GAH7 EQU 

GAHX+12 

0341 

000567 

GBF7 EQU 

GAHX+1 3 

0342 

000570 

GCMZ EQU 

GAMX+1 4 
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HICROCOMP TELECOMMUNICATED DATA 


DDP-516 ASSEMBLY LISTIWG 


0343 


000571 

GDHZ 

EQU 

GAHX*15 

0344 


000572 

GEWZ 

EQU 

GAMX+16 

0345 


000573 

GFMZ 

EQU 

GAMXM7 

0346 


000422 

AASD 

EQU 

• 422 

0347 


000423 

BASD 

EQU 

AASD+1 

0348 


000424 

CASD 

EQU 

AASD+2 

0349 


000425 

DASD 

EQU 

AASD+3 

0350 


000426 

EASD 

EQU 

AASD4-4 

0351 


000427 

FA SD 

EQU 

AASD+5 

0352 


000614 

DVXB 

EQU 

• 614 

0353 


000616 

DVYB 

EQU 

DYXB+2 

0354 


000620 

DVZB 

EQU 

DVXB+4 

0355 


000414 

DTXB 

EQU 

• 414 

0356 


000416 

DTYB 

EQU 

DTXB+2 

0357 


000420 

DTZB 

EQU 

DTXB+4 

0358 

00434 

000000 

XSQU 

DBP 

0 


004 35 

000000 




0 35Q 

00436 

000000 

YSQtl 

DBP 

0 


004 3“^ 

000000 




0360 

00440 

000000 

zsou 

OBP 

0 


00441 

000000 




0361 

00442 

000000 

XWRY 

DBP 

0 


00443 

000000 




0362 

00444 

000000 

XZEE 

DBP 

0 


00445 

000000 




0363 

00446 

000000 

YZEE 

DBP 

0 


00447 

000000 




0 3 64 

00450 

000000 

T ACM 

DBP 

0 


00451 

000000 




0365 

00452 

000000 

T3CH 

DEP 

0 


00453 

oooooo 




0366 

00454 

000.000 

TCCM 

DPP 

0 


00455 

oooooo 




0367 

00456 

oooooo 

TDCM 

DBP 

0 


00457 

oooooo 




0368 

00460 

oooooo 

T ECO 

DBP 

0 


00461 

oooooo 




0369 

00462 

oooooo 

TECH 

DBP 

0 


00463 

oooooo 




0370 




END 
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PROGRAM NAME: 

SOURCE: V ACU 
BINARY: BVACU 

ENTRY POINTS (location): VACU (’4410) 

GENERAL DESCRIPTION: 

This subroutine, when called, accumulates delta velocity in the inertial 
frame (DVIX, DVTY and DVIZ calculated by the velocity algorithm, program 
sourcename VELF subroutine entry point VELA). The three accumulators 
(XAV1-XAV3, YAV1-YAV3 and Z AVI -ZAV3) are triple precision accumula- 
tors and a brief examination of this subroutine will show that it performs 
the following three tasks: 

XAV = XAV + 

2 15 

YAV = YAV + PV \ Y 
2 15 


ZAV = ZAV + 

2 1 5 
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MICROCOHP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


0001 




REL 


0002 




SCJBR 

VACU 

0003 

00000 

0 000000 

VACU 

DAC 

** 

0000 

00001 

000007 


DBL 


0005 

00002 

0 0? 00656 


DLD 

DVIX 

0005 

00003 

140040 


CRA 


0007 

00004 

0 06 00446 


DAD 

XA V3 

00 OR 

00005 

0 04 00446 


DST 

X AV3 

0000 

00006 

000201 


IAB 


0010 

00007 

140040 


CRA 


0011 

00010 

000201 


IAB 


0012 

00011 

0 06 00656 


DID 

DVTX 

0011 

00012 

0401 61 


LRS 

15 

0014 

00013 

0 06 00444 


DAD 

X A V 1 

001 5 

00014 

0 04 00444 


DST 

X A VI 

0015 

00015 

0 02 00660 


DLD 

DVIY 

0017 

00016 

140040 


CRA 


ooir> 

00019 

0 06 00452 


DAD 

Y A V 3 

0019 

00020 

0 04 00452 


DST 

YAV3 

0020 

00021 

000201 


TAB 


0021 

00022 

140040 


CRA 


0022 

00023 

000201 


IAB 


0021 

00024 

0 06 00660 


DAD 

DVIY 

0024 

00025 

0401 61 


IRS 

15 

0025 

00026 

0 06 00450 


DAD 

YA VI 

0025 

00027 

0 04 00450 


DST 

Y AV 1 

0027 

00030 

0 02 00662 


DLD 

D VIZ 

0020 

00031 

140040 


CRA 


002° 

00032 

0 06 00456 


DAD 

ZA VI 

0030 

00031 

n 04 00456 


DST 

Z A V 3 

0031 

000 34 

000201 


IAB 


0032 

00035 

140040 


CRA 


0033 

000 36 

000201 


IAB 


0 034 

00037 

0 06 00662 


DAD 

DVIZ 

0035 

00040 

0401 61 


LRS 

15 

0035 

00041 

0 05 00454 


DAD 

Z AV 1 

00 37 

00042 

0 04 00454 


DST 

ZA VI 

0033 

00043 

000005 


SGL 


0039 

00044 

140040 


CRA 


0 040 

00045 

0 04 00446 


STA 

X A V 3 

0041 

00046 

0 04 00452 


STA 

YAV3 

004? 

00047 

0 04 00456 


STA 

Z A V 3 

0043 

00050 

-0 01 00000 


JWP* 

VACU 

0044 


000656 

DVIX 

EQU 

* 656 

0045 


000660 

DVI Y 

EQU 

DVIX+2 

0045 


000662 

DVTZ 

EQU 

DVIX ♦ 4 

0049 


000444 

XA Vi 

EQU 

•444 

0048 


000446 

XAV3 

EQU 

XAV 1+2 

0049 


000450 

YA Vi 

EQU 

XA Vi +4 

0050 


000452 

YAV3 

EQU 

XAVl+6 

0051 


000454 

ZA VI 

EQU 

XA Vi +8 

0052 


000456 

Z AV 3 

EQU 

X AV 1+10 

0053 




END 
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PROGRAM NAME: 

SOURCE: FPOUTC 
BINARY; BFPOUT 

ENTRY POINT (location): FPOUTC (’4462), OUTIOO C4674) 

GENERAL DESCRIPTION: 

FPOUTC is called by the output subroutine FNOP and prints on the 
teletype a decimal number representation of the binary number desig- 
nated by the call. The call in FORTRAN is 


or in DAP 


CALL FPOUTC (ARC, S, P) 


CALL FPOUTC 

DAC ARG 

DAC S 

DAC P 

OCT 0 

where ARG is the number to be printed, S is the number of bits after the 
sign bit before the binary point, and P is how many decimal digits to print 
after the decimal point. 


OUTIOO is also called by FNOP and is used to print on the teletype 
1/100 of a double precision integer. It is only used to print out the 
variable TIME, which is really a count of updates and needs to be divided 
by 100 to scale it to seconds. The call in FORTRAN is CALL OUTIOO 
(TIME), or in DAP 

OUTIOO 
TIME 


CALL 

DAC 
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MICROCOMP TELECOM WO NIC AT ED DATA 


PDP-516 ASSEMBLY LISTING 


0001 






SO BR 

0002 






REL 

0003. 

00000 

0 

000000 

FPOIJ 

DAC 

0004 

00001 

0 

10 

00000 


CALL 

0006 

00002 

000003 

P5C3 

OCT 

0006 

00003 

0 

00 

ooooo 

ARG 

P7F 

0007 

00004 

0 

00 

00000 

SCAL 

PZF 

0008 

00005 

0 

00 

ooooo 

PF EC 

PZE 

0009 

00006 

140040 


CPA 

0010 

00007 

0 

04 

00166 


STA 

0011 

00010 

0 

04 

00173 


STA 

0012 

00011 

0 

02 

00202 


LDA 

0013 

0 0012 

0 

04 

00170 


STA 

0014 

00013 

0 

04 

00171 


STA 

0016 

00014 

0 

04 

00172 


STA 

0016 

00015 

0 

0? 

00206 


LDA 

001 7 
0019 

00 016 

o 

04 

00167 

* 

STA 

001° 

00017 

0 

36 

00003 


LDX 

0020 

00020 

1 

02 

00001 


LDA 

0021 

00021 

000201 


TAB 

0022 

00022 

1 

02 

ooooo 


LDA 

0023 

00023 

000007 


DPT. 

0024 

00024 

0 

04 

00174 


DST 

0026 

00026 

101400 


SMI 

0026 

00026 

0 

01 

00033 


JHP 

0 027 

00027 

0 

12 

00 166 


IRS 

0028 

00 03 0 

0 

07 

00174 


DSB 

0 02 Q 

00031 

0 

07 

00174 


DSB 

0030 

0031 

00037 

0 

04 

00174 

* 

DST 

0 03? 

OO^O? 

000006 

ARC.P 

SGL 

0033 

00034 

-0 

0? 

00004 


T DA + 

0034 

00035 

101040 


Sf!Z 

0 03 6 

0 0 036 

n 

01 

00051 


0 WP 

0 03 f - 

000 3 7 

101400 


SMI 

0 03* 7 

00040 

0 

01 

00144 


OMP 

003« 

00041 

0 

03 

002 1 C 


ANA 

003° 

00042 

0 

05 

00201 


ERA 

0040 

00043 

0 

04 

00046 


STA 

C0U1 

OQ044 

000007 


DBL 

0042 

00045 

0 

02 

001 74 


DID 

0043 

00046 

0 

00 

ooooo 

INS 2 

* * + 

0 04 4 

00047 

0 

04 

00174 


DST 

00 4 S 

00050 

000005 


SGL 

0046 





* 


004? 

00051 

0 

02 

00173 

S DON 

LDA 

004R 

00052 

0400 

60 

NFXT 

LRL 

004° 

00063 

0 

17 

00207 


DIV 

0060 

00054 

0 

04 

00173 


STA 

0061 

00065 

000201 


TAB 

0062 

0067 

00066 

0 

06 

00176 

* 

ADD 

0064 

00057 

000201 


TAB 

0 0*5 

00060 

0 

02 

00167 


LDA 

0056 

00061 

0 

07 

00205 


SOB 

0057 

00062 

0 

04 

00167 


STA 


FPODTC 

♦+ 

FJAT 

3 


SGFL SIGN FLAG 

INT 

BLBL 

ST B 

STR+1 

ST" + 2 0 7FP LAYS CNTR 

SIX 

PPTR 

A F G 

1,1 

0,1 

FP AC 

AFGP 
SGFL 
FF AC 
FF AC 
FF AC 


SCAL 

SOON 

TPI.S 

OC77 

RSI 

INS2 

FF A C 

FF. AC 


INT 

16 

TEN 

INT 

FPWT 


PPTR 

ONF 

PPTR 
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MTC70C0MP TELECOMMUNICAT ED DATA 



DPP- 

516 ASSEMBLY 

LISTING 


0058 

00063 

0404 77 


LGR 

1 

0059 

0006U 

0 04 00000 


STA 

0 

0060 

0006* 

1 02 00170 


IDA 

STR, 1 

0061 

00066 

100001 


SPC 


0062 

00067 

000201 


IAB 


0063 

00070 

0414 70 


LGL 

8 

0C6-4 

00071 

0402 70 


LRR 

8 

0065 

00072 

1 04 00170 


STA 

STR,1 

0066 



♦ 



0067 

00073 

0 02 00173 


LD A 

TNT 

0069 

00074 

100040 


SZE 


POfQ 

00078 

0 01 00052 


JMP 

NEXT 

0070 

00076 

0 02 00166 


LDA 

S GEL 

0071 

00077 

101040 


SNZ 


C 07 2 

00100 

0 01 00104 


JMP 

SOUT 

007 3 

00101 

0 02 00170 


LDA 

STR 

0 074 

00107 

0 05 00204 


ERA 

NEGS 

0075 

00101 

0 04 00170 


STA 

STR 

0O7r, 

CO 104 

0 10 00000 

son? 

CALL 

TNOD A 

0077 

0010 r ' 

0 000170 


DAC 

STR 

0070 

00106 

0 000206 


DAC 

SIX 

0 070 

0010** 

000000 


OCT 

0 

0 0 P o 



* 



o OP 1 

00110 

-0 02 00005 


IDA* 

PPEC 

00P7 

00111 

1 4 0 U 0 7 


TCA 


OOP? 

00112 

101400 


SMI 


0 084 

001 13 

-0 01 00000 


JMP* 

FPOU 

0035 

00114 

0 04 00172 


STA 

CNTP 

0006 

0011 ® 

0 10 00000 


CALL 

T10U 

0087 

00116 

0 000203 


DAC 

DOTC 

OOP® 



* 



0090 

00117 

0 02 C 0 1 7 5 

FI P 

LDA 

LOW 

0090 

00120 

0 16 00207 


MPY 

TFN 

0001 

00171 

000007 


DBL 


0002 

00122 

0 04 00166 


DST 

TEMP 

0090 

00123 

0 02 00174 


DLD 

HIGH 

0 099 

00124 

0 16 00207 


MPY 

TEN 

9 0O r ' 

00125 

0 06 00176 


DAD 

PBMT 

0 noc 

00126 

0 13 00173 


T M A 

DGT 

0097 

9Q127 

140040 


CRA 


n c° ® 

00130 

000201 


IAB 


OOOQ 

00111 

0 06 00166 


DAD 

TEMP 

0100 

00117 

100001 


SPC 


0101 

00131 

0 12 00173 


IRS 

DGT 

0102 

0 0114 

140100 


SSP 


0101 

00115 

0 04 00174 


DST 

FB AC 

0104 

00136 

000005 


SGL 


010 r ' 

00117 

0 10 00000 


CALL 

T10U 

0106 

00140 

0 000173 


DAC 

DGT 

0107 

00141 

0 12 00172 


IRS 

CNTR 

01 o n 

00142 

0 01 00117 


JMP 

FLP 

0109 

00147 

-0 01 00000 


JMP* 

FPOU 

0110 



* 



0111 

00144 

0 05 00200 

TPL3 

ERA 

LSI 

0112 

00145 

141206 


AOA 


01 IP 

00146 

0 04 00153 


STA 

I N SI 

0114 

00147 

0 35 00002 


LDX 

DEC3 
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MICROCOHP TELECOHMUNICAT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0115 

00150 

140040 


CRA 


0116 

00151 

000201 


IAB 


0117 

00152 

1 02 00172 

TPLP 

LDA 

INT-1, 1 

0118 

00153 

0 00 00000 

INSl 

*** 


0119 

00154 

140100 


SSP 


0120 

00155 

1 13 00172 


IMA 

INT-1 , 1 

0121 

00156 

000201 


IAB 


0122 

00157 

0 02 00000 


LDA 

0 

0123 

00160 

0 07 00205 


SOB 

ONE 

0124 

00161 

0 04 00000 


STA 

0 

0125 

00162 

100040 


SZE 


0126 

00163 

0 01 00152 


J HP 

TPLP 

0127 

00164 

0 01 00051 


J HP 

SDON 

0128 



* 



0129 



* 



0130 



* 



0131 

00166 

000000 

TEMP 

DBP 

0 


00167 

oooooo 




0132 

00170 

000000 

STB 

DBP 

0 


00171 

oooooo 




0133 

00172 

oooooo 

CNTR 

BSZ 

1 

0134 

00173 

oooooo 

TNT 

BS7 

1 

0135 

00174 

oooooo 

FR AC 

DBP 

0 


00175 

oooooo 




0136 


000173 

DGT 

EOU 

INT 

0137 


000174 

HIGH 

EQTJ 

FRAC 

01 3 P 


000175 

LOW 

EOU 

ERAC+1 

0139 


000166 

SGFL 

EOU 

TEMP 

0140 


000167 

PPTR 

EQU 

TEMP* 1 

0141 



* 



0142 

00176 

000260 

FPMT 

OCT 

260,0 


00177 

OOOOOO 




0143 

00200 

0411 77 

LSI 

LLS 

1 

0144 

00201 

0401 00 

RSI 

LPS 

0 

0145 

00202 

120240 

BLBL 

OCT 

120240 

0146 

00203 

000256 

DOTC 

OCT 

256 

0147 

00204 

006400 

MEGS 

OCT 

6400 

0148 



* 



0149 

00205 

000001 

ONE 

DEC 

1 

0150 

00206 

000006 

SIX 

DEC 

6 

0151 

00207 

000012 

TEN 

OCT 

12 

0162 

00210 

000077 

0C77 

DEC 

63 

0153 

00211 

OOOOOO 

ZERE 

OCT 

0 

0154 




FIN 


0155 



* 



0156 



* 



0157 




SUBR 

OUTIOO 

0158 




REL 


0159 

00212 

0 oooooo 

O0T1 

DAC 

** 

0160 

00213 

0 10 00000 


CALL 

ARCS 

0161 

00214 

-0 000212 


DAC* 

OUT 1 

0162 

00215 

1 02 00001 


LDA 

1,1 

0163 

00216 

000201 


IAB 


0164 

00217 

1 02 00000 


LDA 

0,1 

0165 

00220 

0 17 00 240 


DIV 

D100 

0166 

00221 

0 04 00236 


STA 

OTHP 

0167 

00222 

140040 


CRA 



117 



MXCFOCOHP TELECOM HO NIC AT ED DATA 



D DP- 

516 ASSEMBLY 

LISTING 


0168 

0022.1 

000201 


IAB ‘ 


0169 

0022 a 

0 17 00240 


DIV 

D100 

0170 

00225 

141206 


AOA 


0171 

00226 

0 04 00237 


STA 

OTMP4-1 

017? 

00227 

0 10 00000 


CALL 

FPOUTC 

0173 

00210 

0 000236 


DAC 

OTMP 

0174 

00211 

0 000242 . 


DAC 

-15 

01*7? 

00232 

0 000241 


DAC 

-2 

0176 

0023? 

000000 


OCT 

0 

0177 

00234 

0 12 00212 


IRS 

noTI 

0178 

0 0235 

-0 01 00212 


J HP* 

OOT 1 

0170 



* 



0180 

00736 

000000 

OTMP 

BSZ 

2 


00237 

000000 




0181 

00240 

000144 

D100 

DEC 

100 

018? 

00241 

000002 


END 



00242 

000017 
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PROGRAM NAME 
SOURCE; STFL 
BINARY: BSTFL 

ENTRY POINTS (location): STFL ('5214) 

GENERAL DESCRIPTION: 

This subroutine is the main controlling program for the Gyro 
Statistical Failure Detection, Isolation Classification and Recompensation 
Process (FDICR). It is called by the main executive every two minutes 
and has as its main input 2 minutes worth of accumulated gyro pulses. 
After computing the appropriate parity equation residuals, failure 
detection and isolation for constant bias and ramp failures is accomplished 
by calling subroutine DTIS. In parallel, variance failure detection and 
isolation is accomplished via subrouting STVR. Upon detection of a 
constant bias/ramp failure, the classification process is started on 
the next iteration by calling subprogram IDEN. With classification 
of the failure as a constant bias or a ramp, recompensation is 
commenced via subroutine COMP. After a delay of 10 iterations 
the reverification of the compensated gyro is started via subroutine 
IDEN. When the failed gyro is recertified it is placed on line. Each 
of the above processes will probably take multiple iterations. Failure 
detection, isolation, identification and recompensation of a 1st and 2nd 
failure proceed in parallel with one another. In addition, the capability 
for the detection of a 3rd failure is included. 
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Gyro Statistical Failure 
Detection, Isolation, Classification 
and Recompensation Subroutine 


M - Main Program 
iteration counter 
(flow chart only) 


no failures 


Obtain 
accumulated 
gyro pulses 
for 2 min. 


No. of existing 
detected gyro failures 


0 / 1 


2 3 


Compute six parity 
equation residuals used 
to detect a first failure 

Z. „ i= 1, 2. ... 6 


f STVR > 

Variance 
failure detection 
& isolation for 
first failure 


No 

Variance 

Failure 


Variance 

Failure 


— » 

Failed gyro code-»-FLSTj 


re-initialization for constant bias /ramp 
and variance failure detection 
and isolation 
















gyro bias polarity indicator PLCD^ 

Failed gyro code *-FLSTj 

address of selected parity 


equation containing failed 


gyro (for identification and 
re compensation) ► PRF1 


initialization for identification 
of first failure 
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Compute single parity equation 
residual (PRF2) containing 
2nd failed gyro, 



Compute single parity 
equation residual (PRF1) 
containing 1st failed 
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C D ) 


triple failure 
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DATA ITEM DEFINITIONS 


FLST (FLST) 


FLST 2 (FLST +1} 

F3FL 


CPIj (CPI + 1) 


CPI (CPI) 

2 

PRF1 

PRF2 

F3PR 


Failed gyro code for the first detected 
failure ( A gyro = 1, B gyro =2, .... 

F gyro = 6). Used for both ramp /constant 
bias and variance failures. 

Same as above except for the second 
detected failure 

Third fail indicator (0=no third fail 
detected, l=third fail detected) 

Variance failure indicator for first 
failure (1 = first failure is a variance 
failure, 0= first failure is not a 
variance failure). Failed gyro code 
is in FLST. 

Same as above except for 2nd failure. 
Failed gyro code is in FLST^, 

Contains address of selected parity 
equation containing first failed gyro. 

Used for identification and recompensation 
of 1st failed gyro. 

same as above except for 2nd failed gyro. 

Contains address of the single parity 
equation in which 1st and 2nd failed gyro 
do not appear. Used for detection of a 
third failure. 
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DATA ITEM DEFINITONS -continued 


Z^ (Z -*■ Z + 11) Table of parity equation residuals 

for the nth iteration of STFL. According 
to the gyro failure status, the table is 
composed as follows: 

No Failures - Z 1 are the 6 parity 

\ n 6, n J 

equation residuals used to 
detect a first failure. 

One failure - Z. — *-Z c are the 5 parity 

1, n 5, n r j 

equation residuals used to 

detect a 2nd failure. Z 0 

o, n 

is the parity equation 

residual used for identification 

and compensation of the 1st 

failed gyro (PRF1 above). 

Two failures- Z^ is the parity equation 

residual used to detect a 

3rd failure., Z c is the 
d, n 

parity equation residual 
used for identification and 
compensation of the 2nd failed 
gyro(PRF2 above). Zg 
is the same as in the one 
failure case. 

Three failures- Z c and Z„ are the same 
d, n 6, n 

as in the two failure case. 
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ITCPOCONP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


0001 






StJBR 

STFL 

000? 






PEL 


0003 

OOOOO 

0 

000000 

STFL 

DAC 

** 

0004 

00001 

000007 


DBL 


0005 

00002 

0 

02 

0034 4 


DID 

GAPA 

0 006 

00003 

0 

04 

00426 


DST 

HA 

0007 

00004 

0 

02 

00346 


DLD 

GAPA*2 

no 00 

00005 

0 

04 

00430 


DST 

WB 

000° 

00006 

0 

02 

00350 


DLD 

GAPA+4 

0010 

00007 

0 

04 

00432 


DST 

VC 

001 1 

00010 

0 

02 

00352 


DLD 

GAPA+6 

0012 

00011 

0 

04 

00434 


DST 

HD 

001 3 

00012 

0 

02 

00354 


DLD 

GAP A+B 

0014 

0001 3 

0 

04 

00436 


DST 

HE 

001 c 

00014 

0 

02 

00356 


DLD 

GAPA+10 

0 016 

00015 

0 

04 

00440 


DST 

WF 

0017 

00016 

000005 


SOL 


001 Q 

00017 

0 

02 

00640 


LDA 

FLST 

ooio 

00020 

100040 


SZE 


00 20 

00021 

0 

01 

00061 


J HP 

SODF 

002 1 

000?? 

000007 


DBL 


002? 

00 0 ?3 

0 

35 

01025 


I- DX 

= 0 

0023 

00024 

0 

10 

00556 


J ST 

ABCD 

0024 

00025 

0 

10 

00577 


J ST 

ABCF 

0 0 26 

00026 

0 

10 

00632 


J ST 

ABZF 

002 6 

000 27 

0 

10 

00673 


7 ST 

ADEF 

0027 

0 0 03 0 

0 

10 

00703 


JST 

BCDE 

0020 

00031 

0 

10 

00747 


J ST 

CDEF 

0020 

00032 

000005 


SGL 


0070 

00 0 3 3 

0 

02 

01024 


LDA 

- 1 2 

on? 1 

000 3 4 

0 

10 

OOOOO 


CALL 

STVR 

0032 

0 0 0 3 5 

0 

01 

00041 


JMP 

CKBF 

0 03 3 

00036 

0 

04 

00640 


STA 

FLST 

0 03 4 

00037 

0 

12 

006 51 


IRS 

CPI + 1 

0035 

00040 

0 

01 

00056 


JMP 

I NC 1 

0036 

00041 

0 

02 

01024 

CK9P 

LDA 

= 12 

0037 

00042 

0 

10 

OOOOO 


CALL 

DTI S 

0030 

00043 

-0 

01 

OOOOO 


JMP* 

STFL 

0030 

00044 

-0 

04 

00502 


STA* 

PC P2 

004 0 

00045 

000201 


IAB 


0041 

00046 

0 

04 

00640 


STA 

FLST 

004? 

0 0 0 4 7 

1 

02 

00460 


LDA 

PRAD, 1 

004 3 

c 0050 

o 

04 

00446 


STA 

PRF1 

0 04 4 

00051 

140040 


CR A 


0045 

00052 

000201 


IAB 


0046 

00053 

0 

02 

00636 


LDA 

PLTN 

0047 

0 0 0 6 4 

0 

35 

01023 


LDX 

-2 

0 040 

00055 

0 

10 

OOOOO 


CALL 

ID IN 

004 n 

00056 

0 

10 

OOOOO 

I NC 1 

CALL 

ZEIN 

0050 

00057 

0 

10 

OOOOO 


CALL 

ZBTA 

0 051 

0 0060 

-0 

01 

OOOOO 


JMP* 

STFL 

005? 

00061 

0 

02 

00641 

SODF 

LDA 

FLST *1 

00 5 3 

00062 

100040 


SZE 


0054 

00063 

0 

01 

00251 


JHP 

DBF! 

0056 

00064 

0 

35 

00640 


LDX 

FLST 

0 056 

0 0065 

000007 


DBL 


0057 

0 00 66 

- 1 

01 

00451 


.IMP* 

FLAD, 1 
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MTCROCOMP TELECOM HON I CAT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0058 

00067 

0 02 00650 

PARK 

OLD 

CPI 

0059 

00070 

000201 


IAB 


0060 

00071 

100040 


S2E 


0061 

00072 

0 01 00114 


JHP 

CK2F 

0062 

00073 

-0 10 00446 


JST* 

PR FI 

006 3 

00074 

0 35 01023 


LDX 

=2 

0064 

00075 

0 10 00000 


CALL 

IDEN 

0065 

00076 

0 01 00106 


JMP 

DOCH 

0066 

00077 

0 01 00102 


JMP 

NO IP 

0067 

00100 

0 10 00000 


CALL 

C MI N 

006H 

00101 

0 01 00114 


JMP 

CK2F 

0069 

00102 

0 10 00000 

NO 1 P 

CALL 

ZEIN 

0070 

00103 

0 04 00640 


ST A 

FLST 

007 1 

00104 

0 10 ooooo 


CALL 

ZBTA 

007? 

00105 

-0 01 ooooo 


J HP* 

STFL 

0 073 

00106 

000005 

DOCK 

SGL 


0074 

00107 

0 02 00644 


LDA 

IDSW+2 

0076 

00110 

101040 


SNZ 


0076 

0011 1 

0 01 00114 


JMP 

CK2F 

0077 

00112 

0 35 01023 


LDX 

=2 

007$ 

00113 

0 10 ooooo 


CALL 

COMP 

0079 

001 14 

000005 

CK2P 

SGL 


0080 

00116 

0 02 01022 


LDA 

= 10 

008 1 

00116 

0 10 ooooo 


CALL 

ST VR 

0 082 

00117 

0 01 00124 


JMP 

CKB 2 

0093 

00120 

0 04 00641 


STA 

FLST+1 

0 084 

00121 

0 12 00650 


IRS 

CPI 

0085 

00122 

0 10 OOOOO 


CALL 

ZBTA 

0086 

00123 

0 01 00144 


JMP 

CKB 3 

0087 

00124 

0 02 01022 

CKB2 

LDA 

= 1 0 

0 08 0 

00125 

0 10 ooooo 


CALL 

DTTS 

008^ 

00126 

-0 01 ooooo 


JMP* 

STFL 

0090 

00127 

o 04 00442 


STA 

ADTM 

009 1 

00130 

0404 73 


LGR 

5 

0092 

no 1 31 

0414 73 


I GL 

5 

0093 

00132 

-0 04 00503 


STA* 

PLCE) 

009 4 

001 73 

000201 


IAB 


0095 

00134 

0 04 00641 


STA 

FLST+ 1 

0086 

00135 

1 02 00460 


LDA 

PR AD, 1 

0 09 7 

00 1 36 

0 04 00447 


STA 

PRF2 

0098 

00137 

140040 


CRA 


0099 

00140 

000201 


IAB 


0100 

00141 

0 02 00636 


LDA 

PIT M 

0101 

00142 

0 35 01025 


LDX 

=0 

01 0? 

00143 

0 10 OOOOO 


CALL 

IDIN 

0103 

00144 

000007 

CKB 3 

DBL 


0104 

0014 5 

0 02 00416 


DLD 

DBPO 

0105 

00146 

-0 04 00477 


DST* 

ETA 

010 6 

0 0 14 7 

-0 04 00500 


DST* 

ZETA 

0107 

00 150 

0 02 00640 


DLD 

FLST 

0109 

00161 

0 04 00414 


DST 

FSTM 

0 1 09 

00 152 

000005 


SGL 


0110 

00163 

0 02 00415 


LDA 

FSTM+1 

0111 

0016 4 

0 11 00414 


CAS 

FSTM 

oil 2 

00155 

0 01 00160 


JMP 

* + 3 

0113 

00 156 

101000 


NOP 


0114 

0 015 7 

0 01 00162 


JMP 

* + 3 
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MIC R OCOM P TELECOM MO NIC AT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0115 

00160 

0 13 00414 


IMA 

FSTM 

0115 

00161 

0 13 00415 


IMA 

PS T M ♦ 1 

om 

00162 

0 02 01021 . 


LDA 

=11 

01 15 

00163 

0 07 00415 


SUB 

FSTH+1 

Olio 

00164 

0 16 00415 


MPY 

F ST (1*1 

0120 

00165 

000201 


IAB 


012 1 

00166 

0401 77 


LRS 

1 

0122 

00167 

0 06 00414 


ADD 

FSTM 

0121 

00170 

0 04 00000 


STA 

0 

0124 

00171 

1 02 00451 


LDA 

FLAD, 1 

0125 

00172 

0 04 00450 


STA 

F3PR 

012 5 

00173 

0 02 00651 


LDA 

CPI*1 

0127 

00174 

100040 


SEE 


0120 

00175 

-0 01 00000 


J HP* 

STFL 

0120 

00176 

0 02 00650 


LDA 

CPI 

0130 

00177 

100040 


SZE 


0131 

00200 

-0 01 OOOOO 


JMP* 

STFL 

0132 

0 0201 

0 02 00442 


LDA 

ADTM 

0133 

00202 

0414 65 


LGL 

11 

0134 

00203 

0405 66 


ARS 

11 

0135 

00204 

0 04 00442 


STA 

ADTM 

0130 

00205 

101400 


SMI 


0137 

00206 

0 01 00210 


JMP 

*+2 

0130 

00207 

140407 


TCA 


0130 

00210 

0 04 00000 


STA 

0 

0140 

0021 1 

1 02 00460 


LDA 

PR AD, 1 

014 1 

00212 

0 11 00446 


CAS 

PRF1 

014? 

0 0 213 

0 01 00215 


JMP 

* + 2 

0143 

0021 4 

-0 01 00000 


JMP* 

STFL 

0144 

00215 

0 04 00446 


STA 

PRF 1 

014 8 

00216 

0 02 00442 


LDA 

ADTM 

014 5 

00217 

101400 


SMI 


014"' 

00220 

0 01 00227 


JMP 

SMPL 

0148 

00221 

-0 02 00502 


LDA* 

PCP2 

0149 

002 22 

140024 


CHS 


0150 

00223 

-0 04 00502 


STA* 

PCP 2 

0 151 

00224 

-0 02 00501 


LDA* 

IPL2 

0152 

0 0?25 

1 40407 


TCA 


0153 

0 0 22 6 

0 01 00230 


JMP 

*+2 

0154 

0 02 27 

-0 02 00501 

SMPl, 

LDA* 

IPL2 

0155 

0 02 30 

0 04 00442 


STA 

ADTM 

0158 

00231 

0 02 00644 


IDA 

IDS W + 2 

0151 

00232 

100040 


SZE 


0158 

00233 

0 01 00241 


JMP 

NO ID 

0150 

00234 

000201 


TAB 


0160 

00235 

0 02 00442 


LDA 

ADTM 

0161 

00 23 6 

0 35 01023 


LDX 

=2 

0162 

00237 

0 10 oonoo 


CALL 

IDIN 

0163 

002 40 

-0 01 00000 


JMP* 

STFL 

0 164 

00 24 1 

0 02 00442 

NOTD 

LDA 

ADTM 

0165 

0024 2 

000201 


TAB 


0166 

0024 3 

0 02 00442 


IDA 

ADTM 

0167 

002 44 

0 35 01023 


LDX 

= 2 

0168 

00245 

0 10 00000 


CALL 

IDIN 

0160 

00 24 6 

140040 


CRA 


0170 

00247 

0 10 00000 


CALL 

C MI N 

0171 

00250 

-0 01 00000 


JMP* 

STFL 
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MJC n OCOMP TELECOM MO NIC AT ED DATA 



0 DP- 

516 ASSEMBLY 

LIST 

ING 


0172 

00 25 1 

0 02 00652 

DBFL 

LDA 

F3FL 

0171 

00252 

101040 


SNZ 


0174 

00253 

0 01 00 372 


JHP 

TPFL 

0170 

0025ft 

000007 


DBL 


0176 

00255 

0 35 01020 


LDX 

= 8 

017? 

00256 

0 02 00650 


DLD 

CPI 

0178 

00257 

101040 


SNZ 


0179 

00260 

-0 10 00447 


JST* 

PRF2 

0180 

00261 

0 35 01022 


LDX 

= 10 

0181 

00262 

0 02 00650 


DLD 

CPI 

0182 

00263 

000201 


IAB 


0183 

0026ft 

101040 


SNZ 


0184 

00265 

-0 10 00046 


JST* 

PRP1 

01 8S 

00266 

000005 


SGL 


0186 

00267 

0 02 00651 

CNDP 

LDA 

CPI* 1 

0187 

00270 

100040 


SZE 


0188 

00271 

0 01 00313 


J BP 

IDF2 

018° 

00272 

0 35 01023 


LDX 

= 2 

0190 

00273 

0 10 00000 


CALL 

TDEN 

0191 

00274 

0 01 00305 


JHP 

CMF 1 

019? 

00275 

0 01 00300 


JMP 

NMF1 

0191 

00776 

0 10 00000 


CALL 

CHIN 

0194 

00777 

0 01 00313 


JMP 

TDF2 

0 1 °5 

00.100 

000005 

NMF1 

SGL 


0106 

00901 

140040 


CRA 


0197 

00302 

0 04 00640 


STA 

FLST 

0198 

00303 

0 04 00652 


STA 

F3FL 

0190 

00 3 04 

0 01 00313 


JMP 

IDF2 

0200 

00105 

000OD5 

CMF1 

SGL 


0201 

0 0 3 0 6 

0 02 0064ft 


LDA 

insw +2 

020 2 

00107 

101040 


SNZ 


0201 

0031 0 

0 01 00313 


JMP 

IDF2 

0204 

00 31 1 

0 35 01023 


LDX 

= 2 

0205 

00312 

0 10 00000 


CALL 

COMP 

0206 

00313 

000005 

TDP2 

SGL 


0207 

0031ft 

0 02 00650 


LDft 

CPI 

0209 

00315 

100040 


SZE 


0209 

00316 

0 01 00340 


JMP 

DFLX 

0210 

00317 

0 35 01025 


LDX 

= 0 

0211 

00320 

0 10 00000 


CALL 

IDEN 

0212 

00321 

0 01 00332 


JMP 

CMF2 

0213 

00322 

0 01 00325 


JMP 

NMF2 

0214 

00323 

0 10 00000 


CALL 

CHIN 

0215 

0032ft 

0 01 00340 


JMP 

DFLX 

0216 

00325 

000005 

NMF2 

SGL 


0217 

00326 

140040 


CRA 


0218 

00327 

0 04 00652 


STA 

F3FL 

0210 

003 30 

0 04 00641 


STA 

FLST ♦ 1 

0220 

0033 1 

0 01 00340 


JMP 

DFLX 

0221 

00332 

000005 

CMF2 

SGL 


022? 

003 33 

0 02 00642 


LDA 

ID SW 

0221 

00 9 34 

101040 


SNZ 


n?24 

00135 

0 01 00340 


JMP 

DFLX 

0226 

00 336 

0 35 01025 


LDX 

=0 

0226 

00337 

0 10 00000 


CALL 

COMP 

0227 

0 0 3 4 C 

000005 

DFLX 

SGI, 


0? 2 P 

0014 1 

0 02 00640 


LDA 

FLST 
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MTCPOCOMP TELECOMMUNICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0229 

00342 

101040 


SNZ 


0230 

00343 

0 01 00350 


JMP 

RHF1 

0231 

00344 

0 02 00641 


LD A 

FLST+1 

0232 

00345 

100040 


SZE 


02 3 3 

00346 

-0 01 00000 


JMP* 

STFL 

02 34 

00347 

0 01 00367 


JMP 

OUT 

0235 

00350 

0 02 00641 

RMF1 

IDA 

FLST+1 

0236 

00351 

100040 


SZE 


0237 

00352 

0 01 00354 


JMP 

*♦2 

0238 

00353 

0 01 00367 


JMP 

OUT 

0239 

00354 

0 04 00640 


STA 

FLST 

0 240 

00355 

140040 


CRA 


0241 

00356 

0 04 00641 


STA 

FLST+1 

0242 

00357 

0 10 00000 


CALL 

IDMV 

0243 

00360 

0 10 00000 


CALL 

CMHV 

0244 

00361 

0 02 00447 


LDA 

PSF2 

0245 

00 362 

0 04 00446 


STA 

PF.F1 

0246 

00363 

0 02 00650 


LDA 

CPI 

0 2 47 

003 64 

0 04 00651 


STA 

CPI + 1 

024 0 

00365 

140040 


CRA 


0240 

00366 

0 04 00650 


STA 

CPI 

0250 

00369 

0 10 00000 

OUT 

CALL 

Z EIN 

0251 

00390 

0 10 00000 


CALL 

ZBTA 

0 2 57 

00371 

-0 01 00000 


JMP* 

STFL 

0253 

00372 

000007 

TPFL 

DBL 


0254 

00373 

0 35 01025 


LDX 

= 0 

0255 

00374 

-0 10 00450 


JST* 

F3PR 

02 56 

00375 

0 35 01020 


LDX 

= 8 

02 57 

00376 

0 02 00650 


DLD 

CPI 

0250 

00377 

101040 


SN7 


02 59 

00400 

-0 10 00447 


JST* 

PRF2 

0260 

00401 

0 35 01022 


LDX 

= 10 

0261 

00402 

0 02 00650 


DLD 

CP T 

0262 

0 0 4 03 

000201 


IAB 


0263 

00404 

1 01040 


SNZ 


026 4 

004 0 c 

-0 10 00446 


JST* 

PR F 1 

0265 

00 406 

000005 


SGL 


02 6 6 

00409 

0 0? 01023 


LDA 

= 2 

0269 

00 4 10 

0 10 00000 


CALL 

DTI S 

0268 

0041 1 

0 01 00267 


JMP 

CNDF 

0 269 

0 0 4 12 

0 12 00652 


IPS 

F3FL 

0390 

00413 

0 01 00267 


JMP 

CNDF 

0291 

0 0 41!! 

000000 

FSTM 

DBP 

0 


00415 

000000 




027? 

00416 

000000 

DBP 0 

DBP 

0 


00417 

nooooo 




0273 

00420 

000000 

SNFC 

DBP 

0 


00421 

000000 




0294 

0 0 4 22 

000000 

CSFC 

DBP 

0 


00423 

000000 




0295 

0 04 24 

000000 

ZTMP 

DBP 

0 


0 0 4 25 

000000 




0276 

00426 

oooooo 

WA 

DBP 

0 


00427 

000000 




0277 

00430 

oooooo 

WB 

DBP 

0 


004 31 

oooooo 




0 278 

00432 

oooooo 

WC 

DBP 

0 
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MTCRQCONP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


00433 

00000Q 



0278 

00434 

000000 

HD 

DBP 


00435 

oooooo 



0280 

004 36 

000000 

WE 

DBP 


004 37 

oooooo 



0281 

00440 

oooooo 

WF 

DBP 


00441 

oooooo 



0282 

00442 

oooooo 

ADTM 

DEC 

0283 

00443 

060643 

PTOM 

DEC 

0284 

00444 

041513 

SINA 

DEC 

0285 

00445 

066342 

COS A 

DEC 

0286 

00446 

0 

OOOOOO 

PRF 1 

DAC 

0287 

00447 

0 

oooooo 

PRF2 

DAC 

0238 

00450 

0 

oooooo 

F3PR 

DAC 

0280 

00451 

0 

OOOOOO 

FI. AD 

DAC 

0290 

00452 

n 

000504 


DAC 

0241 

0 0 4 51 

0 

000513 


DAC 

0292 

00 484 

0 

000522 


DAC 

0291 

9 0 4 5 5 

0 

000531 


DAC 

0294 

00 4 58 

9 

000540 


DAC 

n? qr 

00457 

0 

000547 


DAC 

028 6 

0 0 4 6 0 

0 

000747 

PR AD 

DAC 

02 9 ' 7 

0046 1 

0 

000736 


DAC 

0298 

00462 

0 

000725 


DAC 

029 n 

00463 

0 

000714 


DAC 

0900 

0 04 6 4 

0 

000703 


DAC 

0901 

00465 

0 

000673 


DAC 

0902 

00466 

0 

090663 


DAC 

0303 

00467 

0 

000653 


DAC 

0304 

0 04 7 0 

0 

00064 3 


DAC 

0105 

0 0471 

0 

000632 


DAC 

0 3 06 

00472 

0 

000621 


DAC 

0 3 rn 

00471 

0 

000610 


DAC 

0 1 08 

00474 

0 

O00577 


DAC 

010'* 

0 04 78 

0 

000566 


DAC 

0 118 

00476 

0 

000556 


DAC 

031 1 


0 006 4 0 

FLST 

EOU 

on? 


900636 

PLTM 

FQU 

0311 


000652 

F3FL 

EQU 

0314 


000650 

CPT 

EOU 

0315 


000344 

GAPA 

EOU 

0118 


000642 

IDSW 

EQU 

0317 


000622 

Z 

EOU 

0 318 

004 77 

0 

OOOOOO 

ETA 

X AC 

031° 

00800 

0 

OOOOOO 

ZETA 

X AC 

0320 

00801 

0 

OOOOOO 

TPL2 

XAC 

0321 

00802 

0 

OOOOOO 

PCP2 

X AC 

0 12? 

00509 

0 

OOOOOO 

PLCD 

XAC 

03 2 3 

00 504 

0 

35 01025 

AFL 

LDX 

03 2 4 

00505 

o 

10 00703 


J ST 

0325 

00506 

0 

10 00714 


JST 

0326 

00507 

0 

10 00725 


J ST 

0127 

00810 

0 

10 00736 


JST 

0329 

00611 

0 

10 00747 


JST 

0 3 29 

00512 

0 

01 00067 


JMP 

0330 

005 1 3 

0 

35 01025 

BFL 

LDX 

03 31 

00514 

0 

10 00643 


JST 


0 

0 

0 

0 

24.41B5 CONVERTS PULSES/2 MIN 

0. 52573 BO 
0. 85065B0 
** 

** 

★ * 

*★ 

AFL 

BFL 

CFL 

DFI. 

EFI. 

FFI 

CDEF 

BDEF 

BCEF 

BCDF 

BCDE 

A DEF 

ACEF 

ACDF 

ACDE 

ABEF 

ABDF 

ABLE 

ABCF 

ABCE 

ABCD 

•640 

•636 

* 652 
•650 

• 344 
•6 42 
•622 
ETA 

Z FT A 
I PL2 
PCP2 
PI, CD 
■=0 

BCDE 
BCDF 
BCEF 
BDEF 
CDEF 
PARX 
= 0 

ACDE 
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MTCROCOMP TELECOMMtTNICAT ED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


033 2 

00515 

0 

10 

00653 


JST 

ACDF 

0333 

00516 

0 

10 

00663 


J ST 

ACEF 

0334 

00517 

0 

10 

00673 


JST 

ADEF 

0 33 5 

00520 

0 

10 

00747 


JST 

CDEF 

03 ?6 

00521 

0 

01 

00067 


JMP 

PAPX 

0337 

00522 

0 

35 

01025 

CFL 

LDX 

=0 

0 33 3 

00523 

0 

10 

00610 


JST 

ABDS 

0330 

00524 

0 

10 

00621 


JST 

ABDF 

0740 

00525 

0 

10 

00632 


JST 

ABEF 

0 74 1 

00526 

0 

10 

00673 


JST 

ADEF 

0 34 3 

00527 

0 

10 

00736 


JST 

BDEF 

0 347 

00530 

0 

01 

00067 


JNP 

PARX 

0344 

005 31 

0 

35 

01025 

DFL 

LDX 

=0 

0 34 5 

00532 

0 

10 

00 566 


JST 

ARCS 

0 346 

005 33 

0 

10 

00677 


JST 

ABCF 

0347 

00634 

0 

10 

00632 


JST 

ABEF 

0 3 4 .3 

0 05.3 5 

0 

10 

00663 


JST 

ACEF 

0 349 

00536 

0 

10 

00725 


JST 

BCEF 

0350 

0 0537 

0 

01 

00067 


J HP 

PARX 

msi 

00540 

0 

35 

01 025 

EFT. 

LDX 

= 0 

0353 

0 054 1 

0 

10 

00556 


JST 

ABCD 

0 3 53 

0 0 642 

0 

10 

00577 


JST 

ABCP 

0 35 4 

0 05 4 3 

0 

10 

00621 


JST 

ABDF 

0 35 5 

00544 

0 

10 

00653 


JST 

ACDF 

0756 

0 05 4 5 

0 

10 

00714 


JST 

BCDF 

0357 

00546 

0 

01 

00067 


JMP 

PARX 

0350 

0 0547 

0 

35 

01025 

FFL 

LDX 

= 0 

0354 

00 550 

0 

10 

00556 


J ST 

ABCD 

0 36 0 

00551 

0 

10 

00566 


JST 

ABCE 

0361 

00552 

0 

10 

00610 


JST 

ABDE 

0 362 

0 0 56 3 

0 

10 

00643 


JST 

ACDE 

0 36 :< 

0 0 c 6 4 

0 

10 

00703 


JST 

RCDE 

0 1 F. 4 

0 0 6 5 r 

0 

01 

00067 


JMP 

PARX 

n .7 6 5 

00 556 

0 

000000 

ABCD 

DAC 

** 

0 3 66 

0055 7 

0 

02 

00432 


DLD 

WC 

0367 

00560 

0 

06 

00434 


DAD 

WD 

03 6 5 

0056 1 

0 

04 

00420 


DST 

SNFC 

0369 

00562 

0 

03 

00426 


DLD 

WA 

0 3 70 

0 0563 

0 

07 

00430 


DSB 

VB 

0 371 

00564 

0 

10 

00757 


JST 

MLSC 

0 372 

0 0^66 

-0 

01 

00556 


J HP* 

ABCD 

0 37 3 

00*66 

0 

nooooo 

ABCF 

DAC 


0 3 n 4 

0 0 6 6 7 

0 

02 

004 16 


DLD 

DBPO 

0375 

00570 

0 

07 

00426 


DSB 

WA 

0376 

00571 

0 

07 

00436 


DSB 

W F 

0377 

00572 

0 

04 

00420 


DST 

SNFC 

077« 

0057 3 

0 

02 

00430 


DLD 

we 

0374 

0 0 574 

0 

07 

00432 


DSB 

WC 

03 8 0 

0 05 75 

0 

10 

00757 


JST 

MLSC 

038 1 

0 05 76 

-0 

01 

00666 


JMP* 

ABCE 

03 R 2 

00677 

0 

000000 

A BCF 

DAC 

** 

0 38 7 

00600 

0 

02 

00430 


DLD 

WE 

03 8 4 

00601 

0 

06 

00440 


DAD 

WF 

0 78 5 

006 0 0 

0 

04 

00420 


DST 

SNFC 

0786 

0 06O3 

0 

02 

004 16 


DID 

DBPO 

0387 

00604 

0 

07 

00426 


DSB 

WA 

0388 

00605 

0 

07 

00432 


DSB 

WC 
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OOP- 

516 

ASSEMBLY 

LISTING 


0389 

00606 

0 

10 

00757 


JST 

HLSC 

0390 

00607 

-0 

01 

00577 


JHP* 

ABCF 

0391 

00610 

0 

000000 

ABDE 

DAC 

** 

03°2 

00611 

0 

02 

00430 


OLD 

WB 

0393 

00612 

0 

06 

00436 


DAD 

WE 

0394 

00613 

0 

04 

00420 


DST 

SNFC 

0995 

00614 

0 

02 

00416 


DLD 

DBPO 

0398 

00616 

0 

07 

00426 


DSB 

WA 

0397 

00616 

0 

07 

00434 


DSB 

WD 

039R 

00617 

0 

10 

00757 


JST 

HLSC 

0399 

00620 

-0 

01 

00610 


JHP* 

ABDE 

0400 

00621 

0 

oooooo 

ABDF 

DAC 

** 

0401 

00622 

0 

02 

00416 


DLD 

DBPO 

0402 

00623 

0 

07 

00426 


DSB 

WA 

0403 

00624 

0 

07 

00440 


DSB 

WF 

0404 

00625 

0 

04 

00420 


DST 

SNFC 

0405 

00626 

0 

02 

00430 


DLD 

WB 

0406 

0062*7 

0 

07 

00434 


DSB 

WD 

0407 

00630 

0 

10 

00 757 


JST 

HLSC 

04 OB 

00631 

-0 

01 

00621 


JHP* 

ABDF 

040° 

00632 

0 

oooooo 

ABEF 

DAC 

** 

041" 

00633 

0 

02 

00416 


DLD 

DBPO 

041 1 

00634 

0 

07 

00426 


DSB 

WA 

0412 

00635 

0 

07 

00 4 30 


DSB 

WB 

0413 

00636 

0 

04 

00420 


DST 

SNFC 

0 414 

006 37 

0 

02 

00436 


DLD 

WE 

0 415 

00640 

0 

06 

00440 


DAD 

WF 

0416 

00641 

0 

10 

007 57 


JST 

HLSC 

0417 

0064? 

-0 

01 

00632 


JHP* 

ABEF 

0418 

00643 

0 

ooc 

>000 

ACDE 

DAC 

** 

0419 

00 6 49 

0 

02 

00426 


DLD 

WA 

0420 

00645 

0 

07 

00432 


DSB 

wc 

0421 

00646 

0 

04 

00420 


DST 

SNFC 

0422 

00647 

0 

02 

00434 


DLD 

WD 

0423 

00650 

0 

07 

00436 


DSB 

WE 

0424 

00651 

0 

10 

00757 


JST 

HLSC 

0425 

00652 

-0 

01 

00643 


JHP* 

ACDE 

0426 

00653 

0 

oooooo 

ACDF 

DAC 

** 

0427 

00654 

0 

02 

00426 


DLD 

WA 

0428 

00655 

0 

07 

00434 


DSB 

WD 

0429 

00656 

0 

04 

00420 


DST 

SNFC 

0430 

0065*7 

0 

02 

00432 


DLD 

WC 

0431 

00660 

0 

07 

00440 


DSB 

WF 

04 3 2 

00661 

0 

10 

007 57 


JST 

HLSC 

0433 

00662 

-0 

01 

00653 


JMP* 

ACDF 

0434 

00663 

0 

oooooo 

ACEF 

DAC 

** 

0415 

00664 

0 

02 

00432 


DLD 

WC 

0 43 6 

00665 

0 

07 

00436 


DSB 

WE 

0437 

00666 

0 

04 

00420 


DST 

SNFC 

0430 

00667 

0 

02 

00426 


DLD 

WA 

04 39 

00670 

0 

07 

00440 


DSB 

WF 

0440 

00671 

0 

10 

00757 


JST 

HLSC 

0441 

00672 

-0 

01 

00663 


JHP* 

ACEF 

0442 

00673 

0 

OOOOOO 

ADEF 

DAC 

** 

0443 

00674 

0 

02 

00434 


DLD 

WD 

0444 

00675 

0 

07 

00440 


DSB 

WF 

0445 

00676 

0 

04 

00420 


DST 

SNFC 
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MICPOCONP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0446 

00677 

0 

02 

00426 


DID 

WA 

0447 

00700 

0 

07 

00436 


D SB 

WE 

044 8 

00701 

0 

10 

00757 


J ST 

NLSC 

0 4 49 

0070? 

-0 

01 

00673 


JMP* 

ADEF 

04 SO 

00701 

0 

000000 

BCDE 

DAC 

** 

0 4 S 1 

00704 

0 

02 

00416 


DID 

DBPO 

04 S 7 

00705 

0 

07 

00430 


DSB 

WB 

0451 

00706 

0 

07 

00434 


DSB 

WD 

0454 

00701 

0 

04 

00420 


DST 

SNFC 

0 4 55 

00710 

0 

0? 

00432 


DID 

wc 

04 5 5 

00711 

0 

06 

00436 


DAD 

WE 

0457 

non? 

0 

10 

00757 


JST 

ML SC 

04 5 fl 

00711 

-0 

01 

00703 


JMP* 

BCDE 

0 45° 

00714 

0 

000000 

BCDF 

DAC 

♦ ♦ 

04 5 0 

007 15 

0 

02 

00430 


DID 

WB 

046 1 

00716 

0 

06 

00432 


DAD 

WC 

04 6? 

00717 

0 

04 

00420 


DST 

SNFC 

046 1 

00720 

0 

02 

00416 


DLD 

DBPO 

046a 

00121 

0 

07 

00434 


DSB 

WD 

0465 

00722 

0 

07 

00440 


DSB 

WF 

04 6 6 

0 0 7 2 3 

0 

10 

00757 


JST 

mi.sc 

04 61 

00724 

-n 

01 

00714 


JMP* 

BCDF 

0U6R 

0 0125 

0 

000000 

BCEF 

DAC 

** 

0 460 

00726 

0 

02 

00416 


DLD 

DBPO 

n 410 

00727 

0 

07 

00432 


DSB 

WC 

04H 

00710 

0 

07 

00440 


DSB 

WF 

0471 

00131 

0 

04 

00420 


DST 

SNFC 

04 7 0 

001?" 

0 

02 

00430 


DLD 

WB 

04 74 

00133 

0 

07 

00436 


DSB 

WE 

0 4 75 

0 0734 

0 

10 

00757 


JST 

rase 

04 76 

0 0735 

-0 

01 

00725 


J HP* 

BCEF 

0471 

00736 

0 

000000 

BDEF 

DAC 

** 

0 410 

n 0 1 3 1 

0 

02 

00416 


DLD 

DBPO 

■4 47 a 

00740 

0 

07 

00434 


DSB 

WD 

04 PO 

00741 

0 

07 

00436 


DSB 

WE 

OOP 1 

00742 

0 

04 

00420 


DST 

SNFC 

04 9? 

00^4 3 

0 

02 

00430 


DID 

WB 

04 P 1 

00^44 

0 

07 

00440 


DSB 

WF 

04 P 4 

00145 

0 

10 

00757 


JST 

ML SC 

0 40 P 

0 014 6 

-0 

01 

00736 


JMP* 

BDEF 

0 4 S 

00747 

0 

000000 

CDBF 

DAC 

** 

0 4 R 7 

007 50 

0 

02 

00436 


DLD 

WE 

04 R 0 

0 0751 

0 

07 

00440 


DSB 

WF 

0 4 3 0 

00752 

0 

04 

00420 


DST 

SNFC 

0490 

00753 

0 

02 

00432 


DID 

WC 

049 1 

00154 

0 

07 

00414 


DSB 

WD 

04«? 

00155 

0 

10 

00757 


JST 

ML SC 

OUO i 

00756 

-0 

01 

00747 


JMP* 

CDEF 

0 4 9 4 

0 0751 

0 

000000 

MLSC 

DAC 

** 

0 49 5 

00160 

0 

04 

00422 


DST 

CSFC 

0 a 9 £ 

00161 

0 

16 

00445 


MPY 

COS A 

049"» 

00762 

0 

04 

00424 


DST 

ZTMP 

0498 

00763 

0 

02 

00422 


DLD 

CSFC 

0499 

00 764 

000201 


TAB 


0500 

00765 

0 

16 

00445 


ft PY 

COSA 

0 501 

00766 

0401 

61 


LRS 

15 

050? 

00767 

0 

06 

00424 


DAD 

ZTMP 
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MT C 15 OCOM F TELECOM MU NTC AT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


o 50 ^ 

00770 

0 04 00424 

DST 

ZTHP 

0504 

00771 

0 02 00420 

DLD 

SNFC 

0505 

00772 

0 16 00444 

HPY 

SINA 

0506 

00773 

0 06 00424 

DAD 

ZTHP 

0507 

0 077 4 

0 04 00424 

DST 

ZTKP 

0605 

00775 

0 02 00420 

DLD 

SNFC 

0500 

00776 

000201 

TAB 


0510 

00777 

0 16 00444 

HPY 

SINA 

0511 

01000 

0401 61 

LBS 

15 

0512 

01001 

0 06 00424 

DAD 

ZTMP 

n5 1 3 

01002 

0411 70 

LLS 

8 

0614 

01003 

0 04 00424 

DST 

ZTHP 

0515 

01004 

0 16 00443 

HPY 

PTOM 

0516 

01005 

0 04 00420 

DST 

SNFC 

0517 

01006 

0 02 00424 

DLD 

ZTHP 

0515 

0100*7 

000201 

TAB 


0510 

01010 

0 16 00443 

HPY 

PTOH 

0520 

010H 

0401 61 

LBS 

15 

0521 

01012 

0 06 00420 

DAD 

SNFC 

0522 

01013 

0411 73 

LLS 

5 

0521 

010 14 

1 04 00622 

DST 

Z,1 

052U 

01015 

0 12 00000 

IPS 

0 

0525 

01016 

0 12 00000 

IRS 

0 

0 526 

01017 

-0 01 00757 

J HP* 

MLSC 

0627 

01020 

000010 

END 



01021 

000013 




01022 

000012 




01023 

000002 




0 1024 

000014 




01025 

000000 
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PROGRAM NAME: 

SOURCE : DTIS 
BINARY: BDTIS 

ENTRY POINTS (location): DTIS (’6242) 

GENERAL DESCRIPTION: 

The subroutine performs the detection and isolation of a gyro 
constant bias or ramp failure. This is accomplished by computing 2 sets 
of parity equation degradation functions. One set is for positive degradation 
(ZETA) and one is for negative degradation (ETA). Each parity equation 
being computed (6 for 1st failure detection, 5 for 2nd failure detection, 1 for 
3 failure detection) has its corresponding ETA and ZETA functions. If a parity 
equation has a non-zero ZETA function, then its corresponding ETA function is 
zero. Likewise, if a parity equation has a non-zero ETA functional then its 
corresponding ZETA function is zero. If a parity is statistically not degraded, 
then both ZETA and ETA functions are zero, A failure is detected when 
certain of these degradation functions exceed given degradation thresholds. 

Isolation of the failed gyro is accomplished by examining the degradation 
functions and their respective polarities. Which functions are examined and which 
polarities are checked for each possible gyro failure is determined by a 
63 entry isolation table. 
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DTIS 


Detection & Isolation 
Subroutine 


a 1st or 2nd/3rd 
failure being 
detected? ^ 


A1AD X = NFA1 


EXIT 1 = no failure detected 
EXIT 2 = failure detected 


2nd/3rd 
A1 AD i = SFA1 



6 for detection of 
1st fail 

5 for detection of 
2nd fail 

1 for detection of 
3rd fail 


ZET^ n > =>>N^( D T2j 


ETA. = 0 
i, n 

EZTM. =ZETA. 

i i,n 
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^ Comparej EZTM^j; TMEZ^ 


( EXIT 1 ) 


TME2 = 

EZTM,, 1 
u « 

PLTM = 

POLR T1 1 

m ~ Ji 




XFIS is a pointer 
to appropriate section 
of Isolation table 
corresponding to 
existing failure 
status (no failures, 

A failed, etc. ) 

K is a pointer to 
one of three groups 
of 3 registers in 
each section of 
the above table. 

<K = 0, 1,2) 


m will, therefore, 
point to a particular 
group of 3 registers 
(see data item 
list for descriptions 
of items in each 
group) 


( EXIT 1 ) 


SWT1 = 1 
K = m - XFIS 
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G2 ► failed gyro code 

P2 » gyro bias polarity 

indicator 

211 ► pointer to address of 

selected parity equation 
containing failed gyro 

PLTM ► polarity of parity 

equation Zll 

212 *> combined new polarity 

indicator and pointer 
to address of new 
selected parity equation 
containing 1st failed 
gyro and not 2nd failed 
gyro (2nd failure isolation 
only) 


K = 0 
SWTl = 0 


EXIT 2 
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G1 

-» failed gyro code 

PI 

-► gyro bias polarity 


indicator 

ZT1 

-*■ pointer to address of 


selected parity equation 


containing failed gyro 

PLTM 

-►polarity of parity 


equation ZI1 

ZI3 

-*■ combined new polarity 


indicator and pointer 


to address of new 


selected par ity equation 


containing 1st failed gyro 


and not 2nd failed gyro 


(2nd failure isolation 


only) 

K = 0 


SWT1 

= 0 


( EXIT 2 ) 
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DATA ITEM DEFINITIONS 


ZETA 


ETA 


POLR 


EZTM 


RESB 


NFAI 


SFAI 


{ZETA -♦ZETA +11) Table of 6 positive degradation detection 

functions. 

(ETA-**ETA +11) Table of 6 negative degradation detection 

functions. 


(POLR-^POLR +11) Table of 6 degradation indicators ( +1 = 

positive degradation, -1 = negative 
degradation, 0 = no degradation) 

(EZTM -’►EZTM +11) Table of 6 Temporary degradation functions 

(for a particular iteration, EZTM^ = 
ZETA K , if ZETA K * 0 or EZTM K = ETA K 
if ETA K * 0 or EZ TM K = 0 if ETA R = 
ZETA = 0) 

(RESB) Constant used in the computation of the 

degradation detection functions ET A and 
ZETA . 


RESB 


BB cos 
2 


where BB is the specification of gyro 
performance defining degradation given in 


meru 


(NFAI->NFAI + 5) Table of 6 constants defining degradation 

detection functions ZETA and ETA. Used 
for detection of 1st failure. 


(NFAI-^SFAI + 4) Table of 5 constants defining degradation 

thresholds for degradation detection 
functions ZETA and ETA. Used in detection 
of a 2nd or 3rd failure. 


147 



DATA ITEM DEFINITIONS (continued) 


PLTM 


NFIS 


Note: NFAI. (SFAI.) 

l 1 

a p. 6. 12 
_ 

BB cos q 

2 

where ^ = parity equation variance and 
BB is as above. 


(PLTM) „ Temporary register containing polarity 

of principal parity equation residual 
with failed gyro (+1 = positive polarity, 
-1 = negative polarity). 


(NFIS*NFIS + 62) 


Table used to isolate failed gyro. It has 
7 sections corresponding to the existing 
failure status (NFIS = no fails, AFIS = A 
failed BFIS = B failed etc. ). Within 
each section are 3 sets of 3 registers each. 
Each set corresponds to two possible 
failed gyros. The Isolation process first 
selects appropriate section and then narrows 
failure down to two gyros by selecting a 
particular set in that section. Each set 
contains the following items: 


NFIS 


! 1 

12 

13 

W 

G2 

nn 

1 3 

4 6 

7 

91011 

13 14 16 

0 0 0 0 0 0 

0 

0 

0 0 

0 0 

zn 

1 

6 

7 

8 

9 

12 13 

fTv TTl 

IT 






u i 

=A. BC — F } 

DD 


13 

EL 

IG2 

M 


1 3 4 6 7 91011 13 14 16 


G1 


0 0 0 0 


ZT 1 


1 34 6789 


12 13 16 


0 0 0 0 0 0 


ZI2 


6 7 


11 12 
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DATA 


11 

12 
13 

S 

Gl, G2 
IG1 

IG2 

PI 

P2 


ITEM DEFINITIONS continued 


index to principle degradation function 
(ZETA or ETA) for each set. This 
function should exceed threshold first. 

Used in choosing particular set within 
each section. 

index to degradation function {ZETA or 
ETA) in each set which should never exceed 
threshold. Used only in isolating first 
failure. 

index to degradation function (ZETA or 
ETA) which is checked for its polarity. 

Used to decide between the two gyros 
in a set. 

Switch used with 13 to decide between the 
two gyros in a set. 

gyro codes of the two gyros corresponding to 
the particular set. 

Used to isolate 2nd failure only. Index 
to degradation function (ZETA or ETA) 
which is used as a final verification if 
G1 gyro failure 

Same as above except for G2 gyro. 

Switch indicating whether G1 gyro’s bias 
polarity is the same as or opposite the 
polarity of degradation function indexed by I. 
(0 = same as, 1= opposite of) 
same as above except for G2 gyro. 
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DATA ITEM DEFINITIONS continued 


211 index to starting address of parity- 
equation residual computation corresponding 
to degradation function indexed by II 

212 used in isolating 2nd failure only. Index 
to starting address of parity equation 
residual computation which contains 1st 
failed gyro and not G2 gyro. If index is 
negative, polarity of this new parity 
equation residual is opposite that of the 
one currently being used in recompensating 
1st failed gyro. 

213 same as above except for G1 gyro. 


Most of the above items are used in deciding between the two 
gyros in a set. 
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MTCPOCOMP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


0001 






SOBF 

ZEIN 

0002 






StJBR 

DTIS 

0003 






SUBR 

ETA 

0004 






SUBR 

ZETA 

000 5 






REL 


0 000 

00000 

0 

000000 

DTIS 

DAC 

** 

0007 

00001 

0 

04 

00551 


STA 

DS IN 

or ob 

00002 

0 

02 

00640 


LDA 

FIST 

000° 

00003 

101040 


SNZ 


0010 

00004 

0 

01 

00007 


JMP 

*+3 

0011 

00005 

0 

02 

00546 


LDA 

SFAD 

0012 

00006 

0 

01 

00010 


JMP 

*♦2 

0013 

00007 

0 

02 

00547 


LDA 

NFAD 

0 014 

00010 

0 

04 

00550 


STA 

A1 AD 

0015 

00011 

0 

35 

00667 


LDX 

= 0 

0016 

00012 

140040 

DTLP 

CRA 


001^ 

00013 

000201 


IAB 


0 010 

00014 

-0 

02 

00550 


LDA* 

A 1 AD 

0014 

00015 

0401 

70 


LRS 

8 

0020 

00016 

000007 


DBL 


no?i 

00017 

0 

04 

00542 


DST 

A1T51 

0 032 

00020 

0 

02 

00436 


DLD 

DBPO 

0023 

00021 

0 

07 

00542 


DSB 

A 1TM 

0 024 

00022 

0 

04 

00544 


DST 

A2TM 

0 025 

00023 

0 

02 

00436 


DLD 

DBPO 

0026 

00024 

1 

04 

00440 


DST 

PCI R,1 

0027 

00025 

1 

04 

00504 


DST 

EZTM, 1 

00 20 

00026 

1 

02 

00622 


DLD 

Z,1 

002° 

00027 

0 

06 

00540 


DAD 

RESB 

0030 

00030 

1 

06 

00454 


DAD 

ETA, 1 

0031 

0 0031 

1 

04 

00454 


DST 

ETA, 1 

0032 

00032 

1 

02 

00622 


DLD 

Z,1 

0033 

00033 

0 

07 

00540 


DSB 

RESB 

0034 

00034 

1 

06 

00470 


DAD 

ZETA ,1 

0035 

00035 

1 

04 

00470 


DST 

ZETA, 1 

0036 

00036 

100400 


SPL 


0037 

00037 

0 

01 

00056 


JMP 

STP2 

0C3R 

00040 

0 

02 

00436 


DLD 

DBPO 

0039 

00041 

1 

04 

00454 


DST 

ETA, 1 

0040 

00042 

1 

02 

00470 


DLD 

ZETA , 1 

0041 

00043 

1 

04 

00504 


DST 

EZTM, 1 

0042 

000 44 

0 

07 

00542 


DSB 

A1 TM 

006 3 

00045 

100400 


SPL 


0044 

00046 

0 

01 

00114 


JMP 

STP1 

0045 

00 04 7 

0 

02 

00640 


DLD 

FLST 

0046 

00050 

000201 


IAB 


0047 

00051 

100040 


SZE 


00 48 

00052 

0 

01 

00406 


JMP 

FLRT 

004 0 

00053 

0 

02 

00520 


DLD 

PL SI 

0060 

0 0 054 

1 

04 

00440 


DST 

PO LR , 1 

0051 

00055 

0 

01 

00114 


JMP 

ST P 1 

0062 

00056 

1 

02 

00454 

STP2 

DLD 

ET A , 1 

0053 

00057 

0 

1 1 

00 4 36 


CAS 

DBPO 

0 0 54 

00060 

0 

01 

00111 


JMP 

STP3 

0055 

00061 

0 

01 

00063 


JMP 

*+2 

0056 

00062 

0 

01 

00066 


JMP 

SP2A 

0 06 7 

00063 

000201 


IAB 
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"TC^OrOMP TELECOWMONICATED DATA 



9DP- 

■516 

ASSEMBLY 

LISTING 



on 5ft 

00064 

100040 


SZE 



0059 

00065 

0 

01 

00111 


JHP 

STP3 


0050 

00066 

0 

02 

00436 

SP2A 

DLD 

DBPO 


0051 

00067 

1 

04 

00470 


DST 

ZETA, 

1 

0062 

00070 

1 

02 

00454 


OLD 

BTA,1 


0063 

00071 

1 

04 

00504 


DST 

EZT«, 

1 

0064 

00072 

0 

07 

00544 


DSB 

A2TB 


0065 

00073 

0 

11 

00436 


CAS 

DBPO 


0066 

00074 

0 

01 

00114 


JMP 

STP1 


0067 

00075 

0 

01 

00077 


JHP 

*♦2 


0068 

00076 

0 

01 

00102 


Jt!P 

SP2B 


0 069 

00077 

000201 


IAB 



0070 

00100 

100040 


SZE 



0071 

00101 

0 

01 

00114 


JflP 

STP 1 


0072 

00102 

0 

02 

00640 

SP2B 

DLD 

PLST 


0073 

00103 

000201 


IAB 



0074 

00104 

100040 


SZE 



0075 

00105 

0 

01 

00406 


J PIP 

FLRT 


0076 

00106 

0 

02 

00522 


DLD 

NNS1 


0077 

00107 

1 

04 

00440 


DST 

POI. R, 

1 

0078 

00110 

0 

01 

00114 


tTMP 

STP1 


0079 

0 01 1 1 

0 

02 

00436 

STP3 

DLD 

DBPO 


0 COO 

00112 

1 

04 

00470 


DST 

ZETA , 

1 

0081 

00113 

1 

04 

00454 


DST 

ETA, 1 


0082 

00114 

000005 

STP1 

SGL 



0093 

0.0 11 5 

0 

12 

00550 


IRS 

A1AD 


0084 

00116 

0 

02 

00000 


LDA 

0 


OOPS 

00117 

0 

06 

00666 


ADD 

=2 


0086 

00120 

0 

04 

00000 


STA 

0 


0087 

00121 

0 

07 

00551 


SOB 

DSTN 


00 R 0 

00122 

1 

00040 


SZE 



r»06° 

0 012 7 

0 

01 

000 12 


OHP 

DTLP 


0090 

00124 

0 

02 

00551 


LDA 

DSIN 


0091 

00125 

0 

07 

00666 


SOB 

= 2 


0092 

00126 

1 

01040 


SNZ 



009.8 

00127 

-0 

01 

00000 


JMP* 

DTTS 


0 09U 

00130 

0 

02 

00665 


LDA 

=-3 


00^5 

00131 

0 

04 

00551 


ST A 

DS IN 


0096 

00132 

0 

35 

00640 


LDX 

FLST 


0097 

00133 

1 

0 2 

00552 


LDA 

1ST B, 

1 

009R 

0013U 

0 

04 

00417 


STA 

TBTM 


0099 

00135 

0 

06 

00422 


ADD 

SWT2 


0100 

001 36 

0 

04 

00561 


STA 

TBAD 


0101 

00137 

1 

41206 


AOA 



0102 

00140 

0 

04 

00415 


STA 

TAPI 


0103 

00141 

1 

41206 


AOA 



0104 

00142 

0 

04 

00416 


STA 

TAP2 


0105 

00143 

0 

02 

00421 


LDA 

SWT1 


0105 

00144 

1 

00040 


SZE 



0107 

0 014 5 

0 

01 

00215 


JHP 

PRTG 


010° 

00 146 

0 

04 

00420 


STA 

TMEZ 


0109 

00147 

-0 

02 

00561 

ISLP 

LDA* 

TBAD 


0110 

00150 

0404 

63 


LGR 

13 


0111 

00151 

0 

07 

0C664 


SOB 

= 1 


0112 

00152 

0415 

77 


ALS 

1 


0113 

00153 

0 

04 

00000 


STA 

0 


0114 

00154 

1 

02 

00440 


LDA 

POLR , 

1 
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MIC^OCOMP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


0115 

00155 

101040 


SNZ 


0116 

00156 

0 01 00173 


JHP 

NTRG 

0117 

00157 

1 02 00504 


LDA 

EZTN,1 

0118 

00160 

100400 


SPL 


0119 

00161 

140407 


TCA 


0120 

00162 

0 11 00420 


CAS 

THEZ 

0121 

00163 

0 01 00166 


JHP 

* + 3 

0122 

00164 

-0 01 00000 


JHP* 

DTIS 

0123 

00165 

0 01 00173 


JHP 

NTRG 

012U 

00166 

0 04 00420 


STA 

THEZ 

012 5 

00167 

1 02 00440 


LDA 

POLR,1 

0126 

00170 

0 04 00636 


STA 

PLTM 

0127 

00171 

0 02 00561 


LDA 

TBAD 

0128 

00172 

0 04 00414 


STA 

ADTB 

0129 

00173 

0 02 00561 

NTRG 

LDA 

TBAD 

0130 

00174 

0 06 00663 


ADD 

- 3 

0131 

00175 

0 04 00561 


STA 

TBAD 

0132 

00176 

0 12 00551 


IPS 

DS IN 

0133 

00177 

0 01 00147 


JHP 

I SLP 

0134 

00200 

0 02 00420 


LDA 

THEZ 

0135 

00201 

101040 


SNZ 


0136 

00202 

-0 01 00000 


JHP* 

DTIS 

0137 

00203 

0 02 00414 


LDA 

ADTB 

0138 

00204 

0 04 00561 


STA 

TBAD 

0139 

00705 

141206 


AOA 


0140 

00206 

0 04 00415 


STA 

TAPI 

0141 

00207 

141206 


AOA 


0142 

00210 

0 04 00416 


STA 

TAP2 

0143 

0021 1 

0 02 00561 


LDA 

TBAD 

0144 

00212 

0 07 00417 


SUB 

TBTM 

0145 

00213 

0 04 00422 


STA . 

SHT2 

0146 

00214 

0 12 00421 


IRS 

SWT 1 

0147 

00215 

-0 02 00561 

PRTG 

LDA* 

TBAD 

0148 

00216 

000201 


IAB 


0 1 4 0 

00217 

0410 75 


LLL 

3 

0150 

00220 

140040 


CRA 


0151 

00221 

0410 75 


LLL 

3 

0152 

00222 

101040 


SNZ 


0 1 5"* 

00223 

0 01 00232 


JHP 

NZCK 

0154 

00224 

0 07 00664 


SUB 

-1 

0155 

C0225 

0415 77 


ALS 

1 

0156 

00226 

0 04 00000 


STA 

0 

0157 

00227 

1 02 00440 


LDA 

POLR,1 

0158 

00230 

100040 


SZE 


0 1 5 Q 

00231 

0 01 00407 


JMP 

TSOI 

0160 

00232 

0410 75 

NECK 

LLL 

3 

0161 

00233 

0 07 00664 


SUB 

= 1 

0162 

00234 

0415 77 


ALS 

1 

0163 

00235 

0 04 00000 


STA 

0 

0164 

00236 

000201 


IAB 


0 1 6 c 

00237 

0 04 00562 


STA 

SWT M 

0166 

00240 

000201 


IAB 


0167 

00241 

1 02 00504 


LDA 

EZTfl, 1 

0168 

00242 

101040 


SNZ 


0169 

0024 3 

0 01 00254 


JHP 

ISX2 

0170 

00244 

0 02 00636 


LDA 

PLTM 

0171 

00245 

1 05 00504 


ERA 

EZTM , 1 
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MTCPOCOMP TELECOMMOKICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0172 

00246 

0 05 00562 


ERA 

SHTH 

0173 

00247 

101400 


SMI 


0174 

00250 

0 01 00324 


JHP 

ISX 1 

0175 

00251 

1 02 00440 


LDA 

POLR,1 

0176 

00252 

100040 


SZE 


0177 

00253 

0 01 00407 


JHP 

IS01 

0178 

00254 

0410 77 

15X2 

LLL 

1 

017P 

00255 

0 02 00640 


LDA 

FIST 

0180 

00256 

101040 


SHZ 


0181 

00257 

0 01 00307 


JHP 

IX2A 

0182 

00260 

140040 


CRA 


0183 

00261 

0410 75 


LLL 

3 

0184 

00262 

0 07 00664 


SOB 

-1 

0185 

00263 

0415 77 


ALS 

1 

0185 

00264 

0 04 00000 


STA 

0 

0187 

00265 

1 02 00440 


LDA 

POLR 1 1 

0188 

00266 

101040 


S HZ 


0189 

00267 

-0 01 ooooo 


JHP* 

DTI S 

0190 

00270 

1 02 00504 


LDA 

EZTH, 1 

0191 

00271 

1 00400 


SPL 


0192 

00272 

140407 


TCA 


0193 

00273 

0 04 00420 


STA 

TflBZ 

0194 

00274 

-0 02 00415 


LDA* 

TAPI 

0195 

00275 

0404 63 


LGR 

13 

0190 

00276 

0 07 00664 


SOB 

= 1 

0197 

00277 

0415 77 


ALS 

1 

0198 

00300 

0 04 00000 


STA 

0 

0197 

00301 

1 02 00504 


LDA 

EZTH,1 

0200 

00302 

100400 


SPL 


0201 

00303 

140407 


TCA 


0202 

00304 

0 11 00420 


CAS 

THEZ 

0203 

00305 

-0 01 00000 


JHP* 

DTI S 

0204 

00306 

0 01 00305 


JHP 

*- 1 

0205 

00307 

140040 

IX2A 

CRA 


0206 

00310 

0410 75 


LLL 

3 

0207 

00311 

000201 


IAB 


0208 

00.312 

-0 02 00415 


LDA* 

TAPI 

0209 

00313 

0404 77 


LGR 

1 

0210 

00314 

141044 


CAR 


0211 

00315 

0414 71 


LGL 

7 

0212 

00316 

0 04 00423 


STA 

PGTH 

0213 

00317 

-0 02 00416 


LDA* 

TAP2 

02 14 

00320 

0404 73 


LGR 

5 

0215 

00321 

0 05 00423 

IS03 

ERA 

PGTH 

0216 

00322 

0 04 00423 


STA 

PGTH 

0217 

00323 

0 01 00402 


JHP 

ISOT 

0218 

00324 

0410 74 

ISX1 

LLL 

4 

0219 

00.325 

0 02 00640 


LDA 

PLST 

0220 

00326 

100040 


SZE 


0221 

00327 

0 01 00334 


JHP 

DX1 A 

0222 

00330 

1 02 00440 


LDA 

POLR, 1 

0223 

00331 

101040 


SHZ 


0224 

00332 

-0 01 OOOOO 


JHP* 

DTIS 

0225 

00333 

0 01 00366 


JHP 

1X1 A 

0226 

00334 

-0 02 00415 

DX1 A 

LDA* 

TAPI 

0227 

00335 

000201 


IAB 


0228 

00336 

140040 


CRA 
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MICFOCOMP TELECOMMUNICATED DATA 


DDP- 

516 ASSEMBLY 

LISTING 


0229 00337 

0410 75 

LLL 

3 

0230 00340 

0 07 00664 

SOB 

= 1 

0231 00341 

0415 77 

ALS 

1 

0232 00342 

0 04 OOOOO 

STA 

0 

0233 00343 

1 02 00440 

LDA 

POLR, 1 

0234 00344 

101040 

SNZ 


0235 00345 

-0 01 OOOOO 

JHP* 

DT IS . 

0236 00346 

1 02 00504 

LDA 

EZTM, 1 

0237 00347 

100400 

SPL 


0239 00350 

140407 

TCA 


0239 00351 

0 04 00420 

STA 

TMEZ 

0240 00352 

-0 02 00561 

LDA* 

TBAD 

0241 00353 

0414 66 

LGL 

10 

0242 00354 

0404 63 

LGR 

13 

0243 00355 

0 07 00664 

SOB 

= 1 

0244 00356 

0415 77 

ALS 

1 

0245 00357 

0 04 00000 

STA 

0 

0246 00360 

1 02 00504 

LDA 

EZTM, 1 

0247 00361 

100400 

SPL 


0248 00362 

140407 

TCA 


0249 00363 

0 11 00420 

CAS 

TMEZ 

0250 00364 

-0 01 OOOOO 

JMP* 

DTI S 

0251 00365 

0 01 .00364 

JMP 

*- 1 

0252 00366 

140040 

T XI A CRA 


0253 00367 

0410 75 

LLL 

3 

0254 00370 

000201 

IAB 


0255 00371 

-0 02 00415 

LDA* 

TAPI 

0256 00372 

141044 

CAP 


0257 00373 

0414 71 

LGL 

7 

0253 00374 

0 04 00423 

STA 

PGTM 

0259 00375 

-0 02 00416 

LDA* 

TAP2 

0260 00376 

0414 75 

LGL 

3 

0261 00377 

141050 

CAL 


0262 00400 

0404 75 

LGP 

3 

0263 00401 

0 01 00321 

JMP 

ISO 3 

0264 00402 

-0 02 00415 

ISOT LDA* 

TAPI 

0265 00403 

0414 70 

LGL 

8 

0266 00404 

0404 70 

LGR 

8 

0267 00405 

0 04 OOOOO 

STA 

0 

0268 00406 

0 12 OOOOO 

FLRT IRS 

DTI S 

0269 00407 

140040 

IS01 CRA 


0270 00410 

0 04 00421 

STA 

SWT1 

0271 00411 

0 04 00422 

STA 

SWT2 

027? 00412 

0 02 00423 

LDA 

PGTM 

0273 00413 

•0 01 00000 

J HP* 

DTIS 

0274 00414 

0 000000 

A DTB DAC 

** 

02^5 00415 

0 000000 

TAPI DAC 

** 

0 ? 76 4 0416 

0 000000 

TAP2 DAC 

* * 

0277 00417 

0 000000 

TBTM DAC 

** 

0278 00420 

000000 

TMEZ DEC 

0 

0279 00421 

000000 

SWT 1 DEC 

0 

0280 00422 

000000 

SWT2 DEC 

0 

0281 00423 

000000 

PGTM DEC 

0 

0282 00424 

0 000000 

ZEIN DAC 

** 

0283 00425 

000007 

DBL 


0284 00426 

0 35 00662 

LDX 

=-24 

0285 00427 

0 02 00436 

DLD 

DBPO 
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MTCROCOMp TELECOM MU NIC AT ED DATA 



PD p - 

516 ASSEMBLY 

LISTING 


0286 

004 30 

1 04 00504 

ZBZE D ST 

ETA+24 ,1 

0287 

00431 

0 12 00000 

IRS 

0 

0288 

00U32 

0 12 00000 

IRS 

0 

0280 

00433 

0 01 00430 

J HP 

ZRZE 

0790 

00 4 34 

000005 

SGL 


0291 

0 04 35 

-0 01 00424 

JHP* 

ZEIN 

H292 

00436 

0 00000 

DBPO DBP 

0 


00437 

000000 



0283 

00440 

000000 

POLR BSZ 

12 


00441 

000000 




00442 

000000 




00443 

oooooo 




0 0 4 4 4 

000000 




00445 

oooooo 




00446 

oooooo 




00447 

oooooo 




00450 

oooooo 




00451 

oooooo 




00452 

oooooo 




00453 

oooooo 



079U 

00454 

oooooo 

ETA BSZ 

12 


00455 

oooooo 




00456 

oooooo 




00457 

oooooo 




00460 

oooooo 




00461 

oooooo 




00462 

oooooo 




0 04 6 3 

oooooo 




0 0 4 6 4 

oooooo 




00465 

oooooo 




00466 

oooooo 




0 04 6 7 

oooooo 



0295 

00470 

oooooo 

ZETA BSZ 

12 


00471 

oooooo 




00472 

oooooo 




00473 

oooooo 




00474 

oooooo 




0047ft 

oooooo 




00476 

oooooo 




00477 

oooooo 




00500 

oooooo 




00501 

oooooo 




00502 

oooooo 




00503 

oooooo 



029ft 

00504 

oooooo 

EZTM BSZ 

12 


00505 

oooooo 




00506 

oooooo 




00507 

oooooo 




00510 

oooooo 




00511 

oooooo 




00512 

oooooo 




00513 

oooooo 




00514 

oooooo 




00515 

oooooo 




00516 

oooooo 




00517 

oooooo 



0297 

00520 

000001 

PLS1 OCT 

1,0 
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HICROCOMP TELECOM SONIC AT ED DATA 



DPP- 

516 ASSEMBLY 

LISTING 



00521 

oooooo 



0298 

00522 

177777 

ANSI OCT 

177777,0 


00523 

oooooo 



0299 



* THE FOLLOWING CONSTANTS ARE THE PARITY EOOATION 

0300 



* THRESHOLDS FOR BB EQUAL TO 4 HERU 

0301 

00524 

013327 

NFA1 DEC 

22.841B7 

0302 

00525 

006020 

DEC 

12.064B7 

0303 

00525 

013327 

DEC 

22.841B7 

0304 

00527 

006162 

DEC 

12* 446 B7 

0305 

00530 

00 36.11 

DEC 

7, 536B7 

0306 

00631 

013327 

DEC 

22.041B7 

030" 7 

00532 

013327 

SFA1 DEC 

22.841B7 

0308 

00533 

013327 

DEC 

22*84187 

03 09 

00534 

013327 . 

DEC 

22. 841B7 

0310 

00535 

013327 

DEC 

22.841B7 

0311 

00536 

013327 

DEC 

22. 841B7 

0 312 

00540 

000001 

RESB DBP 

1.701 308B1 5 ACTUALLY RESB/2 


00541 

054704 



0313 



.* END OF 

CONSTANTS 

0 319 

00642 

oooooo 

A 1TM DBP 

0 


0054 3 

oooooo 



0315 

00644 

oooooo . 

A2TM DBP 

0 


00*46 

oooooo 



0 316 

00546 

0 000532 

SFAD DAC 

S PA 1 

0317 

00547 

0 000524 

NF AD DAC 

NF A 1 

0319 

00*50 

0 OOOOOO 

A 1 AD DAC 

** 

0319 

00*61 

OOOOOO 

P SI N DEC 

0 

0320 

00552 

0 000563 

1ST B DAC 

NFIS 

0321 

00553 

0 000574 

DAC 

APIS 

0322 

00554 

0 000605 

DAC 

8 FIS 

0323 

00655 

0 000616 

DAC 

CFIS 

0 32 9 

00556 

0 000627 

DAC 

DFTS 

0325 

00557 

0 000640 

DAC 

EFIS 

0326 

0056 0 

0 000651 

DAC 

FF IS 

0327 

00561 

0 OOOOOO 

TBAD DAC 

** 

0328 

00562 

OOOOOO 

SWTM DEC 

0 

0329 


000636 

, PLTM EQU 

*636 

0330 


000640 

FIST EQU 

• 640 

0331 


000622 

7 , EQU 

•622 

0 33 2 

00563 

035021 

NFIS OCT 

35021,1016,0 


00564 

001016 




00565 

OOOOOO 



0333 

00566 

146543 

OCT 

146543,1000,0 


00567 

001000 




00570 

OOOOOO 



0334 

00571 

063265 

OCT 

63265, 11,0 


00572 

000011 




00573 

oooooo 



0335 

00574 

020435 

AFTS OCT 

20435,126004,705 


00 6 76 

126004 




00676 

000705 



033* 

00*77 

100326 

OCT 

100326,65001,705 


00600 

065001 




00*01 

000705 



0337 

00602 

120724 

OCT 

120724 ,27000,305 


00603 

027000 




00604 

000305 
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iTC^nCOtfP TELECOM "fJNICATED OATA 



nop- 

516 ASSEMBLY 

LISTING 


0 313 

nofios 

020545 

BFIS OCT 

20545,131010,1323 


no 6 ofi 

1 3 10 10 




00607 

001323 



033 Q 

0 0610 

060226 

OCT 

60226, 103006, 1 176 


0061 1 

103006 




00612 

001176 



03en 

006 17 

120614 

OCT 

120614,47000,1166 


00614 

047000 




00615 

001166 



03 U 1 

006 16 

020624 

CFIS OCT 

20624, 1034 1 3, 1200 


00617 

103413 




00620 

001200 



0 342 

00621 

060256 

OCT 

60256 , 112011 ,224 


00622 

112011 




00623 

000224 



0 3 4 1 

00 624 

121022 

OCT 

121022,74401, 4 


00625 

074401 




00676 

000004 



014 4 

0 0 6 2 7 

020723 

DPI S OCT 

20723,125015,540 


006 30 

126015 




006 3 1 

000540 



0^46 

006 37 

100336 

OCT 

100336,43006, 640 


006 37 

043006 




006 34 

0OOR40 



034 3 

00 6 35 

120475 

nCT 

120435,25002,500 


0 0 6 36 

0 25002 




0063^ 

o 0 0 R 0 0 



0 3 4 7 

006 4 0 

021032 

EFTS OCT 

21032, 4301 6, 1544 


0064 1 

043016 




00642 

001544 



0 7 4 R 

0 7643 

100256 

OCT 

100256, 470 07, 23 .3 


00644 

047007 




09645 

0002R 3 



0 3 4 9 

0 0 6 4 6 

060454 

OCT 

60454, 250 12,473 


0 0647 

025012 




00660 

000473 



0130 

00651 

0 21022 

FFIS OCT 

21022,63016,1475 


00667 

063016 




00653 

001475 



0 3 R 1 

0 0654 

100256 

OCT 

100255,71010, 1451 


n 0655 

071010 




0 0656 

001451 



01R2 

00657 

040653 

OCT 

40653,25015,471 


00660 

025015 




00661 

000471 



03 R"* 

00662 

177750 

END 



0 0 6 6 7 

000003 




00 6 6 4 

000001 




0 0 6 6 5 

177775 




0066,6 

000002 




0 0 6 67 

OOOOOO 




158 



PROGRAM NAME 
SOURCE: IDEN 
BINARY: BIDEN 

ENTRY POINTS (location): IDEN ('7132) 
GENERAL DESCRIPTION: 


This subroutine performs two functions; After a failed gyro 
has been detected and isolated, IDEN will verify the failure to be a true 
failure or, if otherwise, will recertify the gyro as normal. If a true failure, 
IDEN will further classify the failure as either a constant bias or a ramp. 

In addition, after each computation of the bias compensation for 
the failed gyro, IDEN will perform the verification test above to ensure that 
the gyro has been properly compensated. After the gyro has been verified as 
normal, it is put back on-line by the controlling program IDEN, 
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Failure Identification and 
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BTC^OCDf'iP 7 EI.ECOB f1 r J NI C AT ED DATA 
DPP-51 * ASSEMBLY LISTING 


0001 






SO BP 

IDEN 

0002 






STJBB 

IDTN 

0002 






5 U BP 

IDPV 

0004 






SOBS 

I PI 2 

0005 






PEL 


0006 

00000 

0 

0000*0 

I DEN 

DAC 

** 

0007 

00 001 

000007 


DBL 


ODOR 

00002 

1 

02 

00642 


DID 

IDStf, 1 

0009 

0000* 

101040 


SNZ 


0010 

00004 

0 

01 

00019 


JMP 

IDT5 

001 1 

nnoo5 

1 

0 2 

00270 


DLD 

STTD, 1 

001? 

00006 

101040 


SNZ 


0011 

00007 

0 

01 

000 1 * 


JWP 

IDT 5 

0014 

000 10 

0 

07 

00244 


DSB 

DBP1 

001 * 

0001 1 

1 

04 

00270 


DST 

STTD, 1 

001* 

00012 

-0 

01 

00000 


J 

IDF N 

ooi* 

0001 3 

1 

02 

00250 

I DT5 

DID 

IDT, 1 

001* 

0 0 014 

100040 


SZE 


0019 

oooib 

0 

01 

00023 


JP1P 

TDTO 

0020 

00016 

1 

0 2 

006 32 


DLD 

Z+8,1 

0021 

00017 

1 

04 

00254 


DST 

SFPS , 1 

0022 

00020 

0 

02 

00246 


DLD 

DBK1 

0021 

ono?i 

1 

04 

00250 


DST 

IDT, 1 

0024 

00022 

-0 

01 

00000 


JBP* 

IDEN 

002* 

00023 

1014 0 0 

TDTO 

SB! 


0 0 2* 

00 0 24 

0 

01 

00027 


JBP 

* + 3 

0077 

0 0 02 5 

0 

02 

00274 


DLD 

D1B8 

00?R 

00026 

0 

01 

00030 


JP!P 

* + ? 

002° 

00027 

0 

06 

00274 


DAT 

D1 B8 

0090 

00030 

1 

04 

0025C 


DST 

TDI , 1 

0031 

00 0 3 1 

0 

0* 

002*4 


DAD 

D1B8 

003? 

00032 

1 

16 

00250 


WPY 

IDT , 1 

00*3 

00033 

0 

10 

00000 


CALI, 

DS03 

003 4 

00034 

0 

04 

00236 


D ST 

AT"P 

0035 

0 0 0 3 5 

1 

02 

006 3? 


DLD 

Z+8, 1 

093* 

000 36 

1 

16 

00250 


MPY 

IDT, 1 

0037 

0003* 

0 

04 

00240 


DST 

BTEP 

0 03* 

00040 

1 

02 

006 32 


DLD 

Z+8, 1 

0039 

0004 1 

00020 1 


TAB 


0040 

00042 

1 

16 

00 2 50 


riPY 

IPJ , 1 

004 1 

00043 

0401 

61 


LPS 

15 

004? 

00044 

0 

06 

00240 


DAD 

BTHP 

0 04 9 

00045 

0411 

70 


LLS 

8 

0044 

00Q46 

0 

04 

00240 


DST 

BTBP 

0045 

00047 

1 

02 

00254 


DLD 

SEDS, 1 

0046 

00050 

0 

07 

00240 


DSB 

BTWP 

004? 

00051 

0 

17 

00236 


DIV 

ATWP 

004R 

00052 

000201 


TAB 


0049 

00053 

140040 


CPA 


0050 

00054 

000201 


IAB 


0051 

00055 

0401 

70 


LPS 

8 

005? 

00056 

1 

06 

00260 


DAD 

ST, 1 

0059 

00057 

1 

04 

00260 


DST 

ST, 1 

0054 

00060 

1 

02 

00254 


DLD 

SE P S , 1 

0055 

00061 

1 

06 

00632 


DAD 

Z + 8, 1 

0 056 

00062 

1 

04 

00254 


DST 

SE PS , 1 

0057 

00063 

1 

02 

00250 


DLD 

IDT, 1 
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MICBOCOHP TELECOHHUNICAT ED DATA 



D DP- 

516 ASSEMBLY 

LISTIHG 


005B 

00064 

0 16 00311 


mpy 

DS2P 

0069 

00065 

0401 76 


LRS 

2 

0060 

00066 

0 04 00236 


D ST 

ATMP 

0061 

00067 

1 02 00264 


DLD 

IDPL, 1 

0062 

00070 

101400 


SHI 


0063 

00071 

0 01 00076 


JHP 

IDT 1 

0064 

00072 

0 02 00242 


DLD 

DBPO 

0 066 

00073 

1 07 00254 


DSB 

SEPS, 1 

0066 

00074 

0 07 00236 


DSB 

ATHP 

0067 

00075 

0 01 00100 


JHP 

IDT 2 

0060 

00076 

1 02 00254 

IDT1 

DLD 

SEPS, 1. 

0069 

00077 

0 07 00236 


DSB 

ATHP 

0070 

00100 

0 04 00236 

IDT2 

D ST 

ATMP 

0071 

00101 

0 07 00304 


DSB 

0 BP 

0072 

00102 

101400 


SHI 


0073 

00103 

0 01 00116 


JHP 

DEGR 

0074 

00104 

0 02 00236 


DLD 

ATHP 

0076 

00105 

0 07 00306 


DSB 

LBP 

0 07 6 

00106 

0 11 00242 


CAS 

DBPO 

007-7 

00107 

0 01 00165 


JHP 

OUT 1 

0070 

00110 

0 01 00112 


JHP 

*♦2 

0079 

001 1 1 

0 01 00166 


JHP 

OT2A 

rcoo 

00112 

000201 


TAB 


0 081 

00113 

100040 


SZE 


0082 

00114 

0 01 00165 


JHP 

OTTT1 

0083 

001 16 

0 01 00166 


JHP 

OT2A 

0084 

00116 

1 02 00642 

DEGR 

DLD 

ID S W , 1 

0086 

001 17 

101040 


SNZ 


0086 

00120 

0 01 00125 


JHP 

DEGA 

0087 

00121 

000005 


SGL 


0088 

00122 

140040 


CRA 


0089 

0012? 

0 10 00000 


CALL 

IDIN 

0090 

00124 

0 01 00165 


JHP 

OUT1 

000 1 

00126 

1 02 00250 

D8GA 

DLD 

IDI, 1 

0092 

00126 

0 16 00310 


MPY 

DS2 

0093 

00127 

0401 76 


LRS 

2 

0 094 

00130 

0 04 00236 


D ST 

ATMP 

0096 

00131 

1 02 00264 


DLD 

IDPL, 1 

0096 

00132 

100400 


SPI. 


0097 

00133 

0 01 00140 


JHP 

TDT3 

0098 

00134 

0 02 00242 


DLD 

DBPO 

0 099 

0 0 1 3 Q 

1 07 00260 


DSB 

ST, 1 

0100 

00136 

0 07 00236 


DSB 

ATHP 

0101 

00137 

0 01 00142 


JHP 

IDT 4 

0102 

00140 

1 02 00260 

I DT3 

DLD 

ST, 1 

0103 

00141 

0 07 00236 


DSB 

ATMP 

0104 

00142 

0 04 00236 

IDT4 

D ST 

ATHP 

0108 

00143 

0 07 00300 


DSB 

DB 

0106 

00144 

101400 


SHI 


0107 

00145 

0 01 00161 


JHP 

RPBS 

0108 

00146 

0 02 00236 


DLD 

ATHP 

0108 

00147 

0 07 00302 


DSB 

LB 

0110 

00150 

0 11 00242 


CAS 

DBPO 

0111 

00151 

0 01 00165 


JHP 

OUT 1 

0112 

00152 

0 01 00154 


JHP 

2 

0113 

00153 

0 01 00157 


JHP 

CNBS 

0114 

00154 

000201 


TAB 
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v TC r ’CrO^P TELECOMMUNICATED DATA 
D DP - 5 1 6 ASSEMBLY 1TSTTNG 


nn s 

00155 

100040 


SZE 


on* 

00156 

0 01 00165 


JHP 

OtlTI 

oir 

00157 

0 02 00244 

CNBS 

OLD 

DPP 1 

01 IP 

001 60 

100000 


SKP 


0119 

00161 

0 02 00246 

RPBS 

DLD 

DBM 1 

0120 

00162 

1 04 00642 


OST 

IDSW, 1 

012 1 

00163 

0 12 00000 


IRS 

IDEN 

0 122 

00164 

0 12 00000 

0UT2 

TRS 

IDEM 

0121 

00165 

-0 01 00000 

OUT 1 

J M P* 

I DEN 

0124 

00166 

1 02 00642 

0T2A 

OLD 

IDSW, 1 

0125 

00167 

101400 


SMI 


0 126 

00170 

0 01 00164 


J HP 

0TTT2 

0129 

00171 

0 10 00000 


CALL 

STRP 

0129 

00172 

0 01 00164 


J HP 

GOT 2 

012 3 

0 0 1 7 .3 

0 000000 

ID1V 

DAC 

** 

0130 

00 174 

000007 


OBL 


oi 3 i 

0 017 5 

0 02 00250 


OLD 

IDT 

0132 

00176 

0 04 00252 


OST 

IDT + 2 

013 3 

00177 

0 02 00260 


OLD 

ST 

0 1 34 

oo^oo 

0 04 00262 


D ST 

ST+2 

917* 

00201 

0 02 00254 


DLD 

SEPS 

0 136 

0 0 20 2 

0 04 00256 


OST 

SEPS+2 

i) 137 

00 2 0 3 

0 02 00264 


OLD 

IDPL 

0 1 

0 0 204 

0 04 00266 


D ST 

IPPL+2 

01 ■ >Q 

007 05 

0 02 00642 


OLD 

IDSW 

01 no 

00206 

0 04 00644 


DST 

IDSW+2 

014 1 

00 2 07 

0 02 00270 


DLD 

STTD 

0 14 2 

0 0 2 10 

0 04 00272 


DST 

STTD+2 

014 3 

00211 

000005 


SGL 


014 4 

00212 

-0 01 0017? 


J HP* 

ID MV 

014* 

003 13 

0 000000 

I DIN 

DAC 

** 

014 6 

00214 

101040 


SNZ 


014 7 

00216 

0 01 00225 


J HP 

IDI A 

0 143 

007 16 

1 04 00264 


STA 

IDPL, 1 

01 4 Q 

002 17 

000201 


TAB 


0 1 r o 

00220 

100040 


SZE 


015 1 

0 0 2 21 

0 01 00225 


OMP 

ID I A 

0 15 2 

00222 

000007 


DBL 


n 1 57 

00223 

0 02 00242 


DLD 

DBPO 

0 154 

09224 

1 04 00642 


DST 

IDSW , 1 

0155 

00^25 

000007 

IDT?. 

DBL 


0156 

00226 

0 02 00242 


DLD 

DBPO 

0 157 

0 022 7 

1 04 00250 


DST 

IDI, 1 

0150 

0 0 7 3 0 

1 04 00254 


DST 

SEPS ,1 

0157 

002 31 

1 04 00260 


DST 

ST, 1 

0160 

0 0 2 3 2 

0 02 00276 


OLD 

INBI 

0161 

0 0 2 3° 

1 04 00270 


DST 

STID, 1 

0 16? 

00 2 34 

000005 


SGL 


016 3 

00235 

-0 01 00213 


.IMP* 

TDIN 

0 164 

00 2 36 

000900 

ATMP 

DBP 

0 


00237 

OOOOOO 




016 5 

00240 

000000 

BTMP 

DBP 

0 


0024 1 

OOOOOO 




016 6 

00242 

000000 

DBPO 

DBP 

0 


0024? 

OOOOOO 




0 157 

00 244 

000001 

DBP 1 

OCT 

1,0 


00745 

OOOOOO 
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MICPCCOHP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 
0168 00246 177777 DBfll OCT 177777,0 

00247 000000 

0167 00250 000000 IDI BSZ 4 

00251 000000 

00252 000000 

00253 000000 

0170 00254 000000 SEPS BSZ 4 

00255 000000 

00256 000000 

00257 000000 

0171 00260 000000 ST BSZ 4 

00261 000000 

00262 000000 
00263 000000 

0172 00264 000000 IDPL BSZ 2 

00265 000000 

0173 00266 000000 IPL2 BSZ 2 

00267 000000 

0174 00270 000000 STID BSZ 4 

00271 000000 

00272 000000 

00273 000000 

0175 00274 000200 D1B8 DEC 1BP8 

00275 000000 

0176 00276 000012 INBI DBP 10BR15 

00277 000000 

0177 * the following constants are for 

0178 + DELTA EQUAL TO 2, 

0179 * SIGMA EQOAL TO 3.64 

0180 * P 


0181 

00.300 

00301 

000004 

000000 

n b 

DBP 

4BB15 

0182 

00302 

00303 

177774 

000000 

LB 

DBP 

-4 BB 1 5 

018 3 

0 03 04 
00 305 

000004 

000000 

n bp 

DBP 

4EB15 

0184 

00 306 
00307 

177774 

000000 

LBP 

DBP 

-4BB15 

01R5 

00310 

007217 

DS 2 

DEC 

3. 64B5 

0186 

0187 

003 1 1 

007217 

DS2P DEC 
* END OP 

3. 64B5 
CONSTANTS 

0188 


000642 

IDS W 

FOU 

•642 

0189 

0190 


000622 

Z 

EQU 

END 

1 622 
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PROGRAM NAME: 

SOURCE: DSQR 
BINARY: BDSQR 

ENTRY POINTS (LOCATION): DSQR ( >7444) 

GENERAL DESCRIPTION: 

This subroutine will compute the square root of a double precision 
number stored in the A,B reg with an even scale factor B2N . It will return 
the square root in the A^ B reg scaled BN . The square root is computed using 
two iterations of the Newton-Raphson square root approximation. Accuracy 
with only 2 iterations is achieved by normalizing the number to lie between 
^ and 1. When this is done, the initial values used are such that the correct 
square root is found with only 2 iterations. 
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MICPOCOMP TEIECOMfWNICATED DATA 
PDP-516 ASSEMBLY LISTING 


0001 




StJBR 

DSQB 

0002 




REL 


0001 

00000 

0 000000 

DSQH 

DAC 

** 

0004 

00001 

0 11 00140 


CAS 

DBZ9 

0005 

00002 

0 01 00014 


JMP 

APOS 

0006 

00003 

0 01 00010 


JMP 

AZER 

0007 

00004 

0 04 00130 


DST 

TS 

0006 

00005 

0 02 00140 


DLD 

DBZR 

0009 

00006 

0 07 00130 


DSB 

TS 

0010 

00007 

0 01. 00014 


JMP 

APOS 

0011 

00010 

000201 

AZER 

TAB 


0012 

00011 

101040 


SNZ 


0013 

00012 

-0 01 00000 


JMP* 

DSOR 

0014 

00013 

000201 


IAB 


0015 

00014 

000005 

APOS 

SGL 


0016 

00015 

0 04 00136 


STA 

SHFT 

0017 

00016 

140040 


CSA 


0018 

00017 

0 13 00136 


IMA 

SHFT 

0019 

00020 

0 11 00146 


CAS 

=•20000 

0020 

00021 

101000 


NOP 


0021 

00022 

0 01 00033 


JMP 

INAP 

0022 

00023 

0411 77 


LLS 

1 

0023 

00024 

0 12 00136 


IRS 

SHFT 

0024 

00025 

0 11 00145 

SLIP 

CAS 

=• 10000 

0025 

00026 

101000 


NOP 


0 026 

00027 

0 01 00034 


JMP 

IN AP+ 1 

0027 

00030 

0411 76 


LLS 

2 

0028 

00031 

0 12 00136 


IRS 

SHFT 

002° 

00032 

0 01 00025 


JMP 

SLIP 

0 010 

00033 

0401 77 

INAP 

LRS 

1 

0011 

00034 

000007 


DPL 


0032 

00035 

0 04 00130 


DST 

TS 

0 03 3 

00036 

000005 


SGL 


0034 

00037 

0 11 00146 


CAS 

=•20000 

0035 

00040 

101000 


NOP 


OOlfi 

00041 

0 01 00045 


JMP 

APX 1 

0037 

00042 

0 16 00124 


MPY 

K2 A 

0038 

00043 

0 06 00125 


ADD 

K2B 

0039 

00044 

0 01 00047 


JMP 

APX1 *2 

0040 

00045 

0 16 00126 

APX1 

MPY 

K 1 A 

0041 

00046 

0 06 00127 


ADD 

Kl B 

0042 

00047 

000201 


TAB 


0043 

00050 

140040 


CRA 


0044 

00051 

000201 


IAB 


0045 

00052 

0 04 00132 


STA 

TS1 

0046 

00053 

0 02 00130 


LDA 

TS 

0047 

00054 

0401 77 


LBS 

1 

0048 

00055 

0 17 00132 


OIV 

TS 1 

0 04*' 

00056 

0 06 00132 


ADD 

TS1 

0050 

0008'? 

0 04 00132 


STA 

TS 1 

0051 

00060 

000201 


IAB 


0052 

0006 1 

1 400 ft 0 


CRA 


0053 

00062 

000201 


TAB 


0054 

00063 

0401 77 


LRS 

1 

0055 

00064 

000007 


DBL 


0056 

00065 

0 04 00134 


DST 

QTMP 

0057 

00066 

0 02 00130 


DLD 

TS 


167 



«!TCR0C0?1P telecom m unicat ed data 



DPT- 

516 ASSEMBLY 

LISTING 


0058 

0006 7 

000006 


SGL 


OOSn 

00070 

0 17 00132 


DIV 

TS1 

0060 

00071 

0 04 00133 


STA 

TS1 + 1 

0061 

00072 

140040 


CRA 


0062 

00073 

000201 


TAB 


0067 

00074 

0 17 00132 


DIV 

TS1 

0064 

00076 

000201 


TAB 


0065 

00076 

0 02 00133 


LDA 

TS1 + 1 

0066 

00077 

000007 


DBL 


0067 

00100 

140200 


RCB 


0 06 0 

00101 

0 06 00134 


DAD 

OTMP 

006° 

00102 

100001 


SRC 


0070 

00103 

0 02 00142 


DLD 

DM AX 

0 07 *• 

00104 

0 04 001 30 


PST 

TS 

0072 

00106 

000005 


SGL 


om 1 

00106 

0 02 00136 


LDA 

SHET 

0074 

00107 

101040 


SNZ 


0076 

00110 

0 01 00121 


JMP 

EX SO 

0076 

oon 1 

140407 


TCA 


0077 

0 0112 

0 03 00144 


ANA 

= « 00077 

0 078 

00113 

0 05 00137 


FRA 

LBS I 

0070 

00114 

0 04 00117 


STA 

9 SHE 

0 080 

00115 

000007 


DBT. 


008 1 

90116 

0 02 00130 


DLD 

TS 

0 08 2 

00117 

0401 00 

PS HE 

LPS 

+* 

008 3 

00120 

-0 01 00000 


.7 HP* 

dsor 

0Q«4 

00121 

000007 

EXSQ 

DBL 


0 08 6 

00122 

0 02 001 30 


DLD 

TS 

0086 

00123 

-0 01 00000 


JNP+ 

DSOR 

0087 

00124 

065214 

K2A 

DEC 

0. 8324B0 

OOP* 

00125 

01 1430 

K 2 B 

DEC 

0. 2974B1 

0 08 Q 

00126 

045520 

K 1 A 

DEC 

0 . 5 884 BO 

0090 

00127 

016324 

K1 B 

DEC 

0. 4 192B1 

009 1 

00130 

000000 

TS 

DR9 

0 


00131 

000000 




0 092 

00132 

000000 

TS1 

DBP 

0 


00133 

oooooo 




0092 

00 134 

000000 

QTMP 

DBP 

n 


00135 

oooooo 




0094 

00136 

oooooo 

SR*T 

DEC 

0 

0096 

00137 

040100 

LBS I 

OCT 

40100 

0 0°6 

00140 

oooooo 

DBZR 

DBP 

0 


00141 

oooooo 




0097 

00142 

077777 

DBA X 

OCT 

77777,77777 


00143 

077777 




0098 

00144 

000077 


END 



00145 

oioono 





00146 

020000 
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PROGRAM NAME 
SOURCE: SVFL 

BINARY: BSVFL 

ENTRY POINTS (LOCATION): SVFL( '7614) 

GENERAL DESCRIPTION: 

This subroutine accumulates and filters AV pulses every 
update for 200 sec for use in the azimuth alignment portion of coarse 
align. The AV's are accumulated in an inertial frame i.e., are not 
compensated for earth rate. 
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AV Accumulation and 
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NTCRCCO'IP T EL EC CM M3 NT CAT ED DATA 


DDP-516 ASSEMBLY LISTING 


00D1 




SUBR 

SV PL 

0002 




SUBR 

Si 

0003 




SUBR 

S2 

0004 




SUBR 

S3 

ooos 




SOBS 

S 4 

0006 




RE L 


OOO"' 

00 000 

0 000000 SVFL 

DAC 

** 

0008 

00001 

0 12 

00146 

IRS 

n 

0000 

00002 

0 12 

00146 

IRS 

n 

0010 

O0Q03 

000007 

DBL 


0011 

00004 

0 02 

00146 

DID 

m 

0012 

00009 

0 16 

00150 

WPY 

K 1 

0013 

00006 

0 04 

00132 

DST 

NK 1 

001 u 

00007 

0 02 

00146 

DID 

M 

001^ 

00010 

0 16 

00146 

MPY 

• M 

0 016 

000 1 1 

0 04 

0 013 0 

DST 

NTMP 

0017 

00012 

0 16 

00 151 

BPV 

K 2 

0018 

0001 3 

0 04 

00134 

DST 

M2K2 

0019 

00014 

0 02 

00130 

DID 


0020 

00019 

000201 

TAB 


0021 

"0016 

0 16 

00 151 

NPY 

K2 

0022 

00017 

0401 

61 

LRS 

15 

0023 

00020 

0 06 

00134 

DAO 

W2K2 

0 0?1> 

00021 

0 0 4 

0 0134 

DST 

M2K2 

0029 

00022 

0 0? 

00454 

DI D 

SDVZ 

0026 

000 2 3 

0 16 

001 ^2 

RPY 

WK1 

0027 

0 0 0 ? 4 

0401 

73 

LRS 

6 

0029 

00029 

0 06 

001 36 

DAD 

SI 

0 029 

00026 

0 04 

001 36 

DST 

SI 

0030 

0 0 0 27 

0 0 2 

00454 

OLD 

SDVZ 

0 031 

000 30 

000 2 01 

IAB 


0032 

0 0031 

0 16 

00132 

WPY 

E K1 

0037 

000 3 2 

0 40 1 

64 

LRS 

20 

0 03 4 

00033 

0 06 

00136 

DAD 

SI 

003 9 

00034 

0 04 

00136 

DST 

Si 

no3f 

00039 

0 0? 

001 32 

DID 

MK1 

('037 

00036 

000201 

IAB 


0039 

000 37 

0 16 

00454 

NPY 

SDVZ 

0 03 9 

0 0040 

0401 

54 

LRS 

20 

0040 

0 0 04 1 

0 06 

00136 

DAD 

SI 

004 1 

0004? 

0 04 

00 136 

DST 

SI 

0047 

00043 

0 02 

00454 

DLC 

SDVZ 

0043 

00044 

0 16 

00134 

MPY 

M2K2 

0044 

0 0 0 4 9 

0401 

74 

LRS 

4 

0 04 6 

00046 

0 06 

00140 

DAD 

S2 

0 04 6 

00047 

0 04 

00140 

DST 

S2 

0 04 7 

00050 

0 02 

00454 

DI,D 

SDVZ 

0048 

00051 

000201 

TAB 


004 ^ 

00092 

0 16 

00 134 

MPY 

M2K 2 

0090 

00053 

0401 

55 

LRS 

19 

0091 

00054 

0 06 

00140 

DAD 

S2 

0092 

00065 

0 04 

00140 

DST 

S2 

0093 

00056 

0 02 

00134 

DLD 

K2K2 

0094 

00057 

000201 

TAB 


0099 

00060 

0 16 

00454 

HPY 

SDVZ 

0096 

0006 1 

0401 

55 

LRS 

19 

0097 

00062 

0 06 

00 140 

DAD 

S2 
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ITCKOCOUP TK1 ECOMNDNICA? ED 

ddp-si 6 assembly 


0050 

00067 

ro^Q 

00064 

0060 

00065 

0061 

00066 

0062 

0n067 

0 06 3 

00070 

0 0 64 

0 0 0 71 

0066 

00072 

0066 

000^3 

00 6 T 

00074 

0060 

00075 

0 06 Q 

00076 

0070 

0007-7 

0 O' 7 1 

001 00 

007? 

00101 

007? 

00107 

0 07 4 

00103 

0075 

00104 

0 07 6 

00105 

007" t 

00106 

0 070 

0 010 7 

C07Q 

001 10 

0 P8 0 

oom 

0 OB 1 

00112 

O0B7 

0011 3 

00P1 

00114 

0054 

OOT IS 

0 OS 5 

O01 16 

0CP6 

00117 

0087 

00120 

0 088 

00121 

008° 

001?7 

OQQO 

00123 

npQ i 

00124 

OOP? 

00125 

0 0°3 

00126 

OOQ 4 

0 0 1 2 "* 

rt rv -C) cr 

00130 
no i 31 

0QQ6 

001 32 
00133 

0007 

00134 

00136 

poop 

00136 

00137 

OOPP 

00140 

00141 

0100 

00142 


00143 
0101 00144 
00145 
010? 00145 
00147 
0101 00150 

0104 00151 

0105 

0106 


0 04 00140 
0 02 00450 
0 16 00132 
0401 73 
0 06 00142 
0 04 00142 
0 02 00450 
000201 
0 16 00132 
0401 5« 

0 06 00142 
0 04 00142 
0 02 00132 
000201 
0 16 00450 
0 40 1 54 
0 06 00142 
0 04 00142 
0 02 00450 
0 16 00134 
0401 74 
0 06 00144 
n 04 00144 
0 02 00450 
000201 
0 16 00134 
0401 65 
0 06 00144 
0 04 00144 
0 02 001 34 
000201 
0 16 00450 
0401 55 
0 06 00144 
0 04 00144 
000005 

-0 01 ooooo 
oooooo 
oooooo 
oooooo 
ooooro 

OOOOOO 

oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
oooooo 
o ooooo 
oooooo 
oooooo 
oooooo 

OOOOOO 

062251 

066763 

000454 

000450 


ORTA 
LISTING 
D ST 
OLD 
MPY 
LFS 
DAD 
DST 
DLD 
TAB 
MPY 
IPS 
DAD 
DST 
DLD 
TAB 
MPY 
LFS 
DAD 
DST 
DLD 
MPY 
LFS 
DA D 
n ST 
DLD 
TAB 
MPY 
TPS 
DAD 
DST 
DLD 
TAB 
MPY 
LFS 
DAD 
DST 
SGI, 
.TMP* 

MTMP DBP 
MK1 DBP 
M2K2 DBP 

5 1 DBP 

52 DBP 

S 3 DBP 

S4 DBP 

M D B° 

K 1 DEC 

K2 DEC 
SDVZ HOD 
SDVY EQU 


52 

SDVY 

MK1 

5 

53 
S3 

SDVY 

MK1 

20 

S3 

S3 

WK1 

SDVY 

20 

S3 

53 

SDVY 
M2K 2 

4 

5 4 

54 

SDVY 

M2K 2 
19 
54 
S4 

M2K2 

SDVY 

IQ 

S4 

S4 

SVFL 

0 

0 

0 

0 

0 

0 

0 

0 

0. 75E-6B-20 
0.5F-1 OB-34 
1 454 

1 450 
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MTCFOCOSP TELECOMMUNICATED DATA 
DD^-516 ASSEMBLY LISTING 

END 


0107 



PROGRAM NAME 
SOURCE: NVIG 
BINARY: BNVIG 

ENTRY POINTS (location): LNAV (’7766) 
GENERAL DESCRIPTION: 


This subroutine performs local-level navigation at a frequency of 
1 update/sec. The coordinate system used is a simplified local-level coordinate 
system where one component R is directed from the center of the earth to the 
navigated vehicle, one component (N) is tangent to the circular meridian and 
directed north, and the final component (E) is tangent to a circle of constant 
latitude and directed east. The quantities computed at each update are: 


VR - radial velocity in m/sec 
VN - North velocity in m/sec 
VE - East velocity in m/sec 
OME - rotation about East directed vector in rev/ sec 
OMN - rotation about North directed vector in rev/ sec 
OMR - rotation about Radial directed vector in rev/ sec 
LAMB - latitude in revs 
OMGA - longitude in revs 
H - altitude in m. 
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Local Level Navigation 


i-jJ.'tri. V 











o 


Compute North, 

East and Radial Velocity 

Components and radius 
vector: 


Compute North, 

East and Radial Rotational 
Components, Compute 
latitude and longitude: 


Compute angular rate corrections 
to be fed back into system. 
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DATA ITEM DESCRIPTIONS 


IDIj 

(IDI + 2) 

Iteration counter used in the 1st failure 
identification / recertification process . 

idi 2 

(IDI) 

Same as above except for a 2nd failure 

SEPS 1 

(SEPS + 2) 

Parity equation residual accumulator 
used in the 1st failure identification/ 
recertification process. 

SEPS 2 

(SEPS) 

Same as above except for a 2nd failure. 

ST x 

(ST + 2) 

Parity equation residual transformation 
accumulator used in identifying a 1st failure 
as a ramp or constant bias. 

ST 2 

(ST) 

same as above except for a 2nd failure 

IDPLj 

(ID PL + 2) 

Polarity of degraded parity equation, 

Zg used in identification/recertification 
process for 1st failure (+1 - positive 
polarity, - 1 = negative polarity) 

IDPL 2 

(IDPL) 

Same as above except for 2nd failure. 

IDSW 1 

(IDSW + 2) 

failure identification code for 1st failed gyro 
(+1 = constant bias, -1 = ramp, 0 = failure 
not identified. ) 

idsw 2 

(IDSW) 

same as above except for 2nd failure- 

STID j 

(STID +2) 

Constant used to specify delay before 
starting the recertification of the 1st failure 
(currently = 10 iterations) 

stid 9 

d' 

(STID) 

same as above except for 2nd failure 
Decision function used in identifying j 
recertifying a 1st or 2nd failure. If 
D*— LBP, then failure is recertified or is 
identified as normal. If D^> UBP, the 
failure is identified as a degraded mode 
(ramp or constant bias). 
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DS2 


DS2P 


UB, LB 


UBP, LBP 


DATA ITEM DESCRIPTIONS continued 


Decision function used in identifying a 
1st or 2nd failure. If D £ LB, then 
the failure is identified as a constant 
bias. IfD £ UB, then the failure is 
identified as a ramp. 

(DS2) Constant used in computing decision function 

D above. 

DS2 = 60 - 



2 

where 6 = dimensionless design parameter 
(= 1 or 2 ) <Tp = maximum value of parity 
equation residual standard deviations. 

(DS2P) Constant used in computing decision 

function D above. 

DS2P = 6 ' °p 

2 

where 6 ’ is another dimensionless design 
parameter (currently = 6 ) 

(UB, LB) Constant limits used in testing decision 

function D above. 

UB = In 03/(1 - <*))/ 6 
LB = o- p ln«l -j3>/*)/6 

where a = . 01, |3 = . 01 

(UBP, LBP) Constant limits used in testing decision 

function D' above. 

UBP = o’ In 0/(1 -a)/ 6 ’ 

LBP = <r p In (j3 / (1 -«))/«■ 

(currently UB = UBP LB = LBP) 
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MTCPCCOHP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0001 





SUBS 

LN A V 

000 ? 





SUBR 

LAMB 

0003 





SUBR 

OMGA 

0004 





SUBR 

H 

000*5 





SUBR 

VR 

0006 





SUBR 

VN 

0007 





SOBR 

VE 

000 R 





RET- 


0009 

ooooo 

0 

000000 

INA V DAC 

** 

0010 

00001 

000007 

DBL 


non 

00002 

0 

02 

00444 

DID 

•444 

0012 

00003 

0 

16 

00774 

MPY 

MP01 

0011 

00004 

0411 

75 

LLS 

3 

0014 

00005 

0 

04 

00730 

DST 

DVR 

0015 

00006 

0 

07 

00444 

DLD 

» 444 

0016 

00007 

000201 

TAB 


0017 

00010 

0 

16 

00774 

MPY 

MP0 1 

0018 

00011 

0401 

64 

LRS 

12 

0010 

00012 

0 

06 

00730 

DAP 

D VP 

0070 

000 13 

0 

04 

00730 

PST 

DVP 

0021 

00014 

0 

02 

00450 

DLD 

• 450 

0022 

000 15 

0 

16 

00775 

MPY 

PP01 

0023 

00016 

041 1 

75 

LLS 

3 

0024 

00017 

0 

04 

00734 

DST 

DVE 

0025 

00020 

0 

02 

00450 

DLD 

* 450 

0 02 6 

00021 

000201 

TAB 


0027 

00022 

0 

16 

00775 

MPY 

PP01 

002 0 

0002.3 

0401 

64 

LRS 

12 

0029 

0 0024 

0 

06 

00734 

DAD 

DVE 

0030 

00025 

0 

04 

00734 

DST 

DVE 

0031 

00 0 26 

0 

02 

00454 

DLP 

• 454 

0032 

00027 

0 

16 

00774 

MPY 

MPO 1 

0033 

000 30 

0411 

75 

LLS 

3 

0034 

00031 

0 

04 

00732 

DST 

DVN 

0036 

00032 

0 

02 

00454 

DID 

•454 

0 03 6 

00033 

000201 

IAB 


0037 

00034 

0 

16 

00774 

MPY 

MP0 1 

0038 

00035 

0401 

64 

LRS 

12 

0039 

00036 

0 

06 

00732 

DAD 

D VN 

0 04 0 

00037 

0 

04 

00732 

DST 

DVN 

0041 

00040 

0 

02 

00766 

DLD 

DBPO 

004? 

0004 i 

0 

04 

00444 

DST 

• 444 

0043 

00042 

0 

04 

00450 

DST 

•450 

0044 

00043 

0 

04 

00454 

DST 

• 454 

0045 

00044 

0 

02 

00704 

DLD 

H 

0046 

00045 

0 

06 

00712 

DAP 

VR 

0047 

00046 

0 

04 

00704 

DST 

H 

004 8 

00047 

0 

07 

00706 

PS B 

HA 

0049 

00050 

0 

04 

00742 

DST 

ATMP 

0050 

00051 

0 

07 

00710 

DSB 

E 

0051 

00052 

0 

04 

00744 

DST 

6THP 

0062 

00053 

0 

16 

00753 

MPY 

K 2 

0059 

00054 

0 

06 

00712 

DAD 

VR 

0054 

00055 

0 

06 

00730 

DAD 

DVR 

0055 

00056 

0 

04 

00712 

DST 

VR 

0056 

00057 

0 

02 

00744 

DLD 

BTMP 

0057 

00060 

000201 

IAB 
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MT.CFOCOMP TELECOM M ON I CAT ED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0058 

00061 

0 

16 

00753 

MPY 

K2 

0050 

00062 

0401 

61 

LRS 

15 

0060 

00063 

0 

06 

00712 

DAD 

VP 

0061 

00064 

0 

04 

00712 

DST 

VR 

0062 

00C65 

0 

02 

00742 

DID 

ATMP 

0063 

00066 

0 

04 

00710 

DST 

E 

0064 

00067 

0 

16 

00752 

MPY 

K1 

0065 

00070 

0 

06 

00712 

DAD 

VR 

0066 

00071 

0 

04 

00712 

DST 

VR 

0067 

00072 

0 

02 

00742 

OLD 

ATMP 

0068 

00073 

000201 

IAB 


0069 

00074 

0 

16 

00752 

MPY 

K1 

0070 

00075 

0401 

61 

LRS 

15 

0071 

00076 

0 

06 

00712 

DAD 

VR 

007? 

00077 

0 

04 

00712 

DST 

VR 

0073 

00100 

0 

02 

00700 

DID 

LAMB 

0074 

00101 

0 

10 

00000 

CALL 

S INX 

0076 

00102 

0 

04 

00736 

DST 

SI NL 

0 076 

00103 

n 

16 

00736 

MPY 

STNL 

0077 

00104 

0 

04 

00742 

DST 

ATMP 

0073 

00105 

0 

02 

00736 

DLD 

S I NL 

0079 

00106 

000201 

I AD 


0080 

00107 

0 

16 

00 7 36 

MPY 

SINL 

008 1 

00110 

0401 

6? 

LRS 

14 

0082 

00111 

0 

06 

00742 

DAD 

ATMP 

0 09 3 

00112 

0 

04 

00742 

DST 

ATMP 

0084 

00119 

0 

16 

00754 

MPY 

Cl 

0085 

00114 

n 

04 

00744 

DST 

BTMP 

0086 

001 15 

0 

0? 

00742 

DLD 

ATMP 

008 ^ 

001 16 

00021 

31 

IAB 


009R 

00117 

0 

16 

00754 

MPY 

Cl 

0089 

00120 

0401 

61 

LRS 

15 

0090 

00121 

0 

06 

00744 

DAD 

BTMP 

0091 

00122 

0 

04 

00744 

DST 

BTMP 

0092 

00123 

0 

02 

00754 

DLD 

Cl 

009 3 

00124 

000201 

IAB 


0094 

00125 

0 

16 

00742 

MPY 

ATMP 

0095 

00126 

0401 

61 

LPS 

15 

0 096 

0 0 1 2 “ 

0 

0 6 

00744 

DAD 

BTMP 

0097 

00130 

0 

04 

00744 

DST 

BTMP 

0098 

00131 

0 

02 

00756 

DLD 

C2 

0099 

00132 

0 

07 

00744 

DSB 

BTMP 

0100 

00133 

0 

04 

00750 

DST 

DTMP 

0101 

00134 

0 

02 

00760 

DLD 

C3 

0102 

00135 

0 

10 

00644 

vIST 

DDIV 

0103 

00136 

0 

16 

00704 

MPY 

H 

0104 

00137 

0401 

61 

LRS 

15 

0105 

00140 

0 

07 

00762 

DSB 

C4 

0106 

00141 

0 

06 

00712 

DAD 

VR 

0 107 

00 142 

0 

04 

00712 

DST 

VP 

0108 

00143 

0 

02 

00700 

DLD 

LAMB 

0109 

00144 

0 

10 

00000 

CALL 

cosx 

0110 

00145 

0 

04 

00740 

DST 

COSL 

0111 

00146 

0 

16 

00740 

MPY 

COSL 

0112 

00147 

0 

04 

00744 

DST 

BTMP 

0119 

00150 

0 

02 

00740 

DLD 

COSL 

0114 

00151 

000201 

IAB 
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0115 

00152 

0 16 

00740 

MPY 

CO SL 

0116 

00153 

0401 

62 

I PS 

14 

0117 

00154 

C 06 

00744 

DAD 

BTMP 

0119 

00155 

0 04 

00744 

DST 

BTMP 

Olio 

00156 

0 02 

00720 

DLP 

R 

0120 

00157 

0 16 

00764 

MPY 

ERTS 

0121 

00160 

0 04 

00746 

DST 

CTMP 

012? 

00161 

0 02 

00720 

OLD 

R 

0173 

00162 

000201 

IAB 


0124 

00163 

0 16 

00764 

MPY 

EFTS 

0126 

00164 

0401 

61 

LRS 

15 

0126 

00165 

0 06 

00746 

DAD 

CTMP 

0127 

00166 

0 04 

00746 

DST 

CTMP 

0128 

00167 

0 16 

00744 

MPY 

BTMP 

0129 

00170 

0 04 

00742 

DST 

ATMP 

0130 

00171 

0 02 

00746 

DLD 

CTMP 

01.3 i 

00172 

000201 

TAB 


013? 

00173 

0 16 

00744 

MPY 

BTMP 

0137 

00174 

0401 

61 

LRS 

15 

0134 

00175 

0 06 

00*142 

DAD 

ATMP 

01 36 

0 0176 

0 04 

00742 

DST 

ATMP 

0136 

00177 

0 02 

00744 

DLD 

BTMP 

0177 

00200 

000201 

TAB 


013 8 

00201 

0 16 

00 746 

MPY 

CTMP 

0130 

00202 

0401 

61 

LRS 

15 

0140 

00203 

0 06 

00742 

DAD 

ATMP 

0141 

00204 

0401 

57 

LRS 

17 

0142 

00205 

0 06 

00712 

DAD 

VP 

014 3 

00206 

0 04 

00712 

DST 

VP 

0144 

00207 

0 02 

00740 

DLD 

COSL 

0 145 

00210 

0 16 

00765 

MPY 

EPTD 

014 6 

0021 1 

0 04 

00744 

DST 

BTMP 

014 7 

00212 

0 02 

00740 

DLD 

COSL 

014R 

00213 

000201 

TAB 


0149 

00214 

0 16 

00765 

MPY 

EPTD 

0150 

00215 

0401 

61 

LPS 

15 

015i 

00216 

0 06 

00744 

DAD 

BTMP 

0152 

00? ic 

0401 

6 r 

T pC 

1 1 

0153 

00220 

0 06 

C n 7 24 

DAD 

OMN 

0154 

00221 

0 04 

00742 

DST 

ATMP 

0155 

00222 

0 16 

00716 

MPY 

VE 

0166 

00223 

0 06 

00712 

DAD 

VR 

01 c * ? 

00224 

0 04 

00712 

DST 

VR 

0168 

00225 

0 02 

00742 

DLD 

ATMP 

0 1 5 Q 

0 0226 

000201 

TAB 


0160 

00227 

0 16 

00716 

MPY 

VE 

016 1 

00230 

0401 

61 

LRS 

15 

0162 

00231 

0 06 

00712 

DAD 

VR 

0163 

00232 

0 04 

00712 

DST 

VP. 

0164 

0023 3 

0 02 

00 716 !' 

DLD 

VE 

0166 

00234 

000201 

IAB 


0166 

00235 

0 16 

00742 

riPY 

ATMP 

0167 

00236 

0401 

61 

LRS 

15 

0169 

00237 

0 06 

00712 

DAD 

VR 

0169 

00240 

0 04 

00712 

DST 

VR 

0170 

00241 

0 02 

00714 

DLD 

VR 

0171 

00242 

0 16 

00722 

MPY 

OMF 
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MICROCOMP TELECOMMUNICATED DATA 
DDP-51 6 A5SEMBLY LISTING 


0172 

00243 

0 04 

00744 

D ST 

BTNP 

0173 

00244 

0 02 

00714 

DLD 

VN 

0174 

00245 

000201 

IAB 


0175 

00246 

0 16 

00722 

MPY 

OME 

on* 

00247 

0401 

61 

LRS 

15 

0177 

00250 

0 06 

00744 

DAD 

BTNP 

0178 

00251 

0 04 

00744 

DST 

BTNP 

0179 

00252 

0 02 

00722 

DLD 

OME 

0180 

00253 

000201 

IAB 


0181 

.00254 

0 16 

00714 

MPY 

VN 

0182 

00255 

0401 

61 

LRS 

15 

0103 

00256 

0 06 

00744 

DAD 

BTNP 

0184 

00257 

0 04 

00744 

DST 

BTNP 

0105 

00260 

0 02 

00712 

DLD 

VR 

0188 

00261 

0 07 

00744 

DSB 

BTMP 

0187 

00262 

0 04 

00712 

DST 

VR 

0188 

00263 

0 16 

00722 

MPY 

OME 

0180 

00264 

0 06 

00714 

DAD 

VN 

0190 

00265 

0 06 

00732 

DAD 

DVN 

0191 

002*6 

0 04 

00714 

DST 

VN 

0192 

00267 

0 02 

00712 

DLD 

VP 

0193 

00270 

000201 

IAB 


0194 

00271 

0 16 

00722 

MPY 

OME 

0195 

00272 

0401 

61 

LRS 

15 

019 8 

00273 

0 06 

00714 

DAD 

VN 

0197 

00274 

0 04 

00714 

DST 

VN 

0198 

00275 

0 02 

00722 

DLD 

OME 

019Q 

00276 

000201 

IAB 


0200 

00277 

0 16 

00712 

MPY 

VR 

0201 

00300 

0401 

61 

LRS 

15 

0202 

00301 

0 06 

00714 

DAD 

VN 

0203 

00302 

0 04 

00714 

DST 

VN 

0204 

00303 

0 02 

00736 

DLD 

SI NL 

0205 

00304 

0 16 

00765 

MPY 

ERTD 

0205 

00305 

0 04 

00744 

DST 

BTMP 

0207 

00306 

0 02 

00736 

DLD 

SINL 

0208 

00307 

000201 

IAB 


0209 

00310 

0 16 

00765 

MPY 

ERTD 

0210 

00311 

0401 

61 

IPS 

15 

0211 

00312 

0 06 

00744 

DAD 

BTMP 

0212 

00313 

0401 

65 

LRS 

11 

0213 

00314 

0 06 

00726 

DAD 

OMR 

0214 

00315 

0 04 

00744 

PST 

BTMP 

0215 

00316 

0 16 

00716 

MPY 

VE 

0216 

00317 

0 04 

00746 

DST 

CTMP 

0217 

00320 

0 02 

00744 

DLD 

BTMP 

0219 

00321 

000201 

IAB 


0219 

00 322 

0 16 

00716 

MPY 

VE 

0220 

00 323 

0401 

61 

LRS 

15 

0221 

00324 

0 06 

00746 

DAD 

CTMP 

0222 

00325 

0 04 

00746 

DST 

CTMP 

0221 

00326 

0 02 

00716 

DLD 

VE 

0224 

00327 

000201 

IAB 


0225 

00330 

0 16 

00744 

MPY 

BTMP 

0226 

00331 

0401 

61 

LRS 

15 

0227 

00332 

0 06 

00746 

DAD 

CTMP 

0228 

00333 

0 04 

00746 

DST 

CTHP 
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STCROCOSP TELECO" NHN I CAT ED DATA 
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0229 00334 

0230 00335 

0231 00336 

0232 00337 

0233 00340 

0234 00341 

0235 00342 

0236 00343 

0237 00344 
0234 00345 

0239 00346 

0240 00347 

0241 00350 

0242 00351 

0243 00352 

0244 00353 

0245 00364 

0246 00355 

0247 00356 
0 2 4 P 00357 

0249 00360 

0250 00361 

0251 00362 

0252 00363 

0253 00364 

0254 00365 

0255 00366 

0256 00367 

025 7 00370 
0255 00371 

0259 00372 

0260 00373 

0261 00374 
026? 0037B 
0?*3 00376 
0264 00377 
026^ 00400 
0266 00401 
0 ? 6 7 00402 
0269 00403 

0269 00404 

0270 00405 

0271 00406 
027? 00407 

0273 00410 

0274 00411 

0275 00412 

0276 00413 

0277 00414 
0 27P 00415 

0279 00416 

0280 00417 
0291 00420 
02R 2 00421 

0283 00422 

0284 00423 

0285 00424 


0 0? 00714 
0 07 00746 
0 04 00714 
0 16 00744 
0 06 00716 
0 06 00734 
0 04 00716 
0 02 00714 
000201 
0 16 00744 
0401 61 
0 06 00716 
0 04 00716 
0 02 00744 
000201 
0 16 00714 
0401 61 
0 06 00716 
0 04 00716 
0 02 00712 
0 16 00742 
0 04 00746 
0 02 00712 
000201 
0 16 00742 
0401 61 
0 06 00746 
0 04 00746 
0 02 00742 
000201 
0 16 00712 
0401 61 
0 06 00746 
0 04 00746 
0 02 00716 
0 07 00746 
0 04 00716 
0 02 00712 
0401 70 
0 06 00720 
0 04 00720 
0 04 00750 
0 02 00766 
0 0 7 00714 
0 10 00644 
0401 70 
0 04 00722 
0 02 00716 
0 10 00644 
0401 70 
0 04 00724 
0 02 00722 
0 16 00772 
0 04 00742 
0 02 00722 
000201 
0 16 00772 


OLD 

VN 

DSB 

CTSP 

DST 

VN 

spy 

BTMP 

DAD 

VE 

DAD 

DVE 

DST 

VE 

DLD 

VN 

IAB 

MPY 

BTMP 

IPS 

15 

DAD 

VE 

DST 

VE 

DLD 

BTMP 

TAB 

SPY 

VN 

LRS 

15 

DAD 

VE 

DST 

VE 

DLD 

VR 

SPY 

ATS P 

DST 

CTSP 

DLD 

VR 

IAB 

SPY 

ATS? 

LRS 

15 

DAD 

CTMP 

DST 

CTSP 

DLD 

ATMP 

TAB 

SPY 

VR 

LRS 

15 

DAD 

CTSP 

DST 

CTSP 

DLD 

VF 

DSB 

CT"P 

DST 

VE 

DLD 

VR 

LRS 

8 

DAD 

P 

DST 

R 

DST 

DTSP 

DLD 

DBPO 

DSB 

VN 

J ST 

DDTV 

LRS 

8 

DST 

OME 

DLD 

VE 

JS^ 

DDIV 

LRS 

8 

DS? 

OS N 

DLD 

OSF 

SPY 

RDRV 

DST 

AT SP 

DLD 

OME 

TAB 

SPY 

R DP V 



HTCRCCONP TELECOMMUNICATED DATA 



DD D - 

516 ASSEMBLY 

LISTING 


0286 

00425 

0401 61 

LRS 

15 

0287 

00426 

0 06 00742 

DAD 

ATHP 

0288 

00427 

0 04 00742 

DST 

ATHP 

0288 

00430 

0 02 00700 

DLD 

LA HB 

0290 

00431 

0 07 00742 

DSB 

ATHP 

0291 

00432 

0 04 00700 

DST 

LAHB 

029? 

00433 

140200 

RCB 


029 3 

00434 

0411 76 

LLS 

2 

0294 

00435 

101001 

SSC 


0295 

00436 

0 01 00447 

JHP 

LBOK 

0296 

00437 

0 02 00766 

DLD 

DBPO 

0297 

00440 

0 07 00700 

DSB 

LAHB 

0298 

00441 

101400 

SSI 


0299 

00442 

0 01 00445 

JHP 

*♦3 

0300 

00443 

0 06 00770 

DAD 

HFFV 

0 301 

00444 

0 01 00446 

JHP 

*♦2 

0302 

00445 

0 07 00770 

DSB 

HFFV 

0303 

00446 

0 04 00700 

DST 

LAHB 

0304 

00447 

0 02 00700 

LBOK DLD 

LAHB 

0305 

00450 

0 10 00000 

CALL 

SINX 

0306 

00451 

0 04 00736 

DST 

SINL 

0307 

00452 

0 02 00700 

DLD 

LAHB 

03C8 

00453 

0 10 00000 

CALL 

COSX 

0309 

00454 

0 04 00740 

DST 

COSL 

0310 

00455 

000101 

NRH 


0311 

0 0456 

000005 

SGL 


0312 

00457 

0 04 00742 

STA 

ATHP 

03“' 3 

00460 

000041 

SCA 


0314 

00461 

0 04 00773 

STA 

SHFT 

0 315 

0046? 

0 02 00742 

LDA 

ATHP 

0316 

0046 3 

000007 

DBL 


0317 

00464 

0 04 00750 

DST 

DTHP 

0318 

00465 

0 02 00724 

DLD 

OMN 

031Q 

00466 

000101 

NFS 


03 20 

00467 

000005 

SGL 


0321 

00470 

0 04 00744 

STA 

BTHP 

0322 

00471 

000041 

SCA 


03 2.3 

00472 

0 07 00773 

SOB 

SHFT 

0324 

00473 

0 04 00773 

STA 

SHFT 

0 325 

0Q474 

0 02 00744 

LDA 

BTHP 

0326 

00475 

000007 

DBL 


0327 

00476 

0401 

LFS 

1 

0329 

00477 

0 10 00644 

J ST 

DDI V 

0329 

00500 

0 04 00742 

DST 

ATHP 

0330 

00501 

000005 

SGL 


0331 

00502 

0 02 00773 

LDA 

SHFT 

0 3 32 

00503 

101400 

SHI 


03 33 

00504 

0 01 00510 

JHP 

*♦4 

0334 

00505 

0 03 01000 

ANA 

-• 00077 

0335 

00506 

0 05 00777 

ERA 

-'41100 

0336 

00507 

0 01 00513 

JHP 

*♦4 

0337 

00510 

140407 

TCA 


0338 

00511 

0 03 01000 

ANA 

='00077 

0339 

00512 

0 05 00776 

ERA 

=• 40100 

0340 

00513 

0 04 00516 

STA 

SFIN 

0341 

00514 

000007 

DBL 


0342 

00519 

0 02 00742 

DLD 

ATHP 
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MICPOCOMP TELECOMMUNICATED DATA 
DDP- 516 ASSEMBLY LISTING 


034? 

00516 

041 1 

00 

SPIN 

LLS 

** 

0344 

00517 

0 04 

00 74 2 


DST 

ATMP 

0345 

00520 

0 16 

00736 


MPY 

SI NL 

034 6 

00521 

0 04 

00726 


DST 

OMP 

0347 

00522 

0 0? 

00742 


OLD 

ATMP 

034 8 

00523 

000201 


IAB 


034« 

00524 

0 16 

00736 


MPY 

SI NL 

0350 

00526 

040 1 

61 


LRS 

15 

0 351 

00526 

0 06 

00726 


DAD 

OMP 

0 352 

00527 

0 04 

00726 


DST 

OMP 

0 353 

00530 

0 02 

00736 


DLD 

SI NL 

0354 

00531 

000201 


IAB 


0355 

00532 

0 16 

00742 


MPY 

ATMP 

0356 

00533 

0401 

61 


IPS 

15 

0357 

00534 

0 06 

00726 


DAD 

OMP 

0358 

00535 

0411 

77 


LLS 

1 

0 35° 

00536 

0 04 

00726 


DST 

OMR 

0360 

00637 

0 02 

00742 


DLD 

ATMP 

0 361 

00540 

0 1* 

00772 


MPY 

PDF V 

0362 

00541 

0 06 

00702 


DAD 

OMGA 

0363 

00542 

0 04 

00702 


DST 

OMGA 

0364 

00643 

0 0? 

00742 


DLD 

ATMP 

0 36 6 

00544 

000201 


IAB 


0366 

00545 

0 16 

00772 


MPY 

PDPV 

0367 

00546 

0 401 

61 


LPS 

15 

0368 

00547 

0 06 

00702 


DAD 

OMGA 

0368 

00650 

0 04 

00702 


DST 

OMGA 

0370 

00551 

140200 


PCS 


0371 

00552 

041 1 

77 


LLS 

1 

0172 

00553 

101001 


SSC 


0373 

00554 

0 01 

00566 


JMP 

LOOT 

03 74 

00655 

0 02 

00702 


DLD 

OMGA 

0375 

00556 

0401 

77 


LRS 

1 

0376 

00557 

1 01400 


SMI 


0377 

0 0 560 

0 01 

00563 


JMP 

*♦3 

0373 

00661 

0 06 

007^0 


DAD 

APEV 

0 37° 

0056? 

0 01 

00564 


JMP 

*♦2 

0380 

00563 

0 07 

00770 


DSP- 

APEV 

0381 

00664 

0411 

77 


LLS 

1 

0382 

00565 

0 04 

00702 


DST 

OMGA 

033? 

00566 

0 02 

C0736 

LOUT 

DLD 

ST NL 

0384 

00567 

0 16 

00765 


MPY 

EPTD 

0^85 

00570 

0401 

6 6 


LPS 

10 

0386 

00671 

0 04 

00742 


DST 

ATMP 

0387 

00572 

0 0? 

00726 


DID 

OMP 

03 88 

0057? 

0411 

76 


LLS 

2 

0389 

00574 

0 06 

00742 


DAD 

ATMP 

0390 

00575 

0 04 

00742 


DST 

ATMP 

0391 

00576 

0 16 

00775 


MPY 

PP01 

0392 

00577 

0 04 

00750 


DST 

DTMP 

039? 

00600 

0 02 

00742 


DLD 

ATMP 

0394 

00601 

000201 


TAB 


0396 

00602 

0 16 

00775 


MPY 

PP01 

0396 

0060.3 

0401 

61 


LPS 

15 

0397 

00604 

0 06 

00750 


DAD 

DTMP 

0398 

00605 

0 04 

00310 


DST 

•310 

0399 

00606 

0 02 

00766 


DLD 

DBPO 
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HTCROCOMP TELECOMMUNICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


oaoo 

00607 

0 07 00722 


DSB 

ONE 

0401 

00610 

0411 76 


LLS 

2 

0402 

006 11 

0 04 00742 


DST 

AT HP 

0403 

00617 

0 16 00775 


SPY 

PP01 

0404 

00613 

0 04 00750 


DST 

DTMP 

0405 

00614 

0 02 00742 


DLD 

ATHP 

0406 

00615 

000201 


IAB 


0407 

00616 

0 16 00775 


HPY 

PP01 

0400 

00617 

0401 61 


IPS 

15 

0409 

00620 

0 06 00750 


DAD 

DTHP 

0410 

00621 

0 04 00312 


DST 

*312 

0411 

00622 

0 02 00740 


DID 

COSL 

0412 

00623 

0 16 00765 


HPY 

ERTD 

0413 

006 24 

0401 66 


LRS 

10 

0414 

00625 

0 04 00742 


DST 

ATHP 

0415 

00626 

0 02 00724 


DID 

OHN 

0416 

00627 

0411 76 


LLS 

2 

0417 

00630 

0 06 00742 


DAD 

ATHP 

04 1 P 

00631 

0 04 00742 


DST 

ATHP 

0419 

00*32 

0 16 00775 


SPY 

PP01 

0420 

006 3 3 

0 04 00750 


DST 

DTHP 

0421 

00634 

0 02 00742 


DLD 

ATHP 

0422 

00635 

000201 


IAB 


0423 

00636 

0 16 00775 


WPY 

PP01 

0424 

00637 

0401 61 


LRS 

15 

0425 

00640 

0 06 00750 


DAD 

DTHP 

0426 

00641 

0 04 00314 


DST 

*314 

0427 

0064? 

000005 


SGL 


0429 

00 64 

-0 01 00000 


JHP* 

LNAV 

0429 

00644 

0 000000 

DDIV 

DAC 

** 

0430 

00645 

0 17 00750 


DIV 

DTHP 

0431 

00646 

0 04 00672 


DST 

THP1 

043? 

00647 

0 16 00751 


HPY 

DTMP+1 

0 433 

00650 

0 04 00674 


DST 

THP2 

0434 

00651 

0 02 00672 


DLD 

THP1 

0435 

00652 

140040 


CPA 


0436 

00653 

000201 


IAB 


0437 

006 54 

0 07 00674 


DSB 

THP2 

0438 

00655 

0 17 00750 


DIV 

DTHP 

0439 

00656 

000201 


IAB 


0440 

00657 

140040 


CPA 


0441 

00660 

000201 


TAB 


0442 

00661 

0401 61 


LPS 

15 

0443 

00662 

0 04 00674 


DST 

THP2 

0444 

00663 

0 02 00672 


DLD 

THP 1 

0445 

00664 

000201 


IAB 


0446 

00665 

140040 


CPA 


0447 

00666 

000201 


IAB 


0449 

00667 

0 06 00674 


DAD 

THP2 

0449 

00670 

-0 01 00644 


JHP* 

DDI V 

0450 

00672 

000000 

THP1 

DBP 

0 


00673 

000000 




0451 

00674 

000000 

TMP2 

DBP 

0 


00675 

oooooo 




0452 

00676 

000000 

ROND 

OCT 

0, 40000 


00677 

040000 




0453 

00700 

007420 

LAMB 

DEC 

0. 117678241BB0 
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MTCROCOMP TELECOMMUNICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0454 

00701 

00702 

005121 

000000 

OMGA 

DBP 

0 

0455 

00703 

00704 

000000 

000000 

H 

DBP 

0 

0456 

00705 

00706 

000000 

000000 

HA 

DBP 

0 

0457 

00707 

00710 

000000 

000000 

E 

DBP 

0 

04 5 R 

00711 

00712 

000000 

000000 

VP 

DBP 

0 

0459 

00713 

00714 

000000 

000000 

V N 

DBP 

0 

0460 

00715 

00716 

000000 

000000 

VE 

DBP 

0 

0461 

00717 

00720 

oooooo 

0*0454 

R 

DEC 

6368449BB23 

0462 

00721 

00722 

060200 

000000 

OME 

DBP 

0 

046 3 

00723 

00724 

000000 

000000 

OWN 

DBP 

0 

0464 

00725 
0 0 7 26 

000000 

000000 

OER 

DBP 

0 

0465 

007 27 
00730 

000000 

oooooo 

DVR 

DBP 

0 

0466 

00731 

0073? 

000000 

oooooo 

0VN 

DBP 

0 

046 7 

00733 

00734 

oooooo 
0 00000 

DVE 

DBP 

0 

0465 

007 35 
00 7 36 

oooooo 

oooooo 

SINL 

DBP 

0 

0469 

00737 

00740 

oooooo 

oooooo 

COSL 

DBP 

0 

0470 

00741 

00742 

oooooo 

oooooo 

ATMP 

DBP 

0 

0471 

00747 

00744 

oooooo 

oooooo 

BTMP 

DBT> 

0 

0472 

00745 

00746 

oooooo 

oooooo 

CTNP 

DBP 

0 

0473 

00747 

00750 

oooooo 

oooooo 

DTMP 

DBP 

0 

0474 

00751 

00752 

oooooo 

131464 

K 1 

DEC 

-O.6B0 

0475 

00753 

154632 

K2 

DEC 

-0.3B0 

0476 

00754 

000517 

Cl 

DEC 

21475. 2963BB21 

0477 

00755 

00756 

043227 

060522 

C2 

DEC 

6378 163BB23 

0478 

00757 

00760 

054600 

004715 

C3 

DEC 

19 . 60804BB8 

0479 

00761 

00762 

065040 

000011 

C4 

DEC 

9 • 80 40 2BB15 

0480 

00763 

00764 

063352 

055532 

ERTS 

DEC 

0. 53 174941 E“ 8 B- 27 

04R1 

00765 

046166 

ERTD 

DEC 

0. 1458423029E-3B-12 

0482 

00766 

OOOOOO 

DBPO 

DBP 

0 

0487 

00767 

00770 

oooooo 

040000 

AREV 

OCT 

40000, 0 


00771 

OOOOOO 
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flTCROCOWP TELECOHHONICATED DATA 


DDP-516 ASSEBBLT LISTING 


04P4 

00772 

012137 

HDR V 

DEC. 

0. 1591549B0 

0485 

00773 

000000 

SHFT 

DEC 

0 

0486 

00774 

127025 

RP01 

DEC 

-.01B-6 

C487 

00775 

050753 

PP01 

DEC 

•01B-6 

0488 


000770 

RPR V 

EQO 

AftEV 

0489 

00776 

040100 


END 

• 


00777 

041100 





01000 

000077 






PROGRAM NAME: 

SOURCE: PPUA 
BINARY: BPPAC 

ENTRY POINTS: (LOCATION): PPAC (’10770) 

GENERAL DESCRIPTION: 

This subroutine accumulates accelerometer pulses for the 
failure isolation .detection, classification and recertification programs 
in this system. 
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fllCFCCO^p TELECOMMUNICATED DATA 



DPP- 

616 ASSEMBLY 

LISTING 


onoi 




REL 


000? 




SUBR 

PP AC 

ooo? 

00000 

0 000000 

P P AC 

DAC 

** 

0 004 

ooooi 

000007 


DBL 


on05 

00002 

0 02 00600 


DID 

PA PC 

0 OOF 

00003 

0401 61 


LBS 

15 

0007 

00 004 

0 06 00664 


DAD 

PACA 

oroR 

oooos 

0 04 00664 


DST 

PACA 

0009 

00006 

0 02 00602 


DLD 

PBPC 

0010 

00007 

0401 61 


LRS 

15 

non 

oooio 

0 06 00666 


DAD 

PACB 

om? 

00011 

0 ou 00666 


DST 

PACB 

001? 

00012 

0 02 00604 


DLD 

PCPC 

0014 

00 01 3 

0401 61 


LRS 

15 

00 16 

00014 

0 06 00670 


PAD 

PACC 

0 016 

000 IF 

0 04 00670 


DST 

PACC 

001 •* 

00016 

0 02 00606 


OLD 

P D PC 

0 0 1 R 

onor> 

0401 61 


LRS 

15 

OHIO 

00020 

0 06 00672 


DAD 

PACD 

0020 

00021 

0 04 00672 


DST 

PACD 

0021 

0002? 

0 02 00610 


DLD 

PPPC 

002? 

000 23 

0401 61 


LRS 

15 

0073 

00024 

0 06 00674 


DAD 

PACE 

0024 

00026 

0 04 00674 


DST 

PACE 

0026 

00026 

0 02 00612 


DLD 

PF PC 

0 02 6 

00027 

0401 61 


LRS 

15 

002'' 

00030 

0 06 00676 


DAD 

PACE 

002R 

0003 1 

0 04 00676 


DST 

PACE 

0 0 2 Q 

00037 

ooooos 


SGL 


0030 

0 0033 

*0 01 00000 


JHP* 

PP AC 

0031 


000600 

PA PC 

EQD 

*600 

00 3? 


000602 

PRPC 

EQO 

PAPC+2 

003 3 


000604 

PCPC 

EQO 

PAPC+4 

0034 


000606 

P D PC 

EQD 

PAPC+6 

0 0 3 6 


000610 

PEPC 

son 

PAPC+R 

0036 


000612 

PF PC 

EQD 

P A PC ♦ 1 0 

OO? 7 


000664 

PACA 

EOU 

1 6 64 

00 3 0 


000666 

PACB 

rod 

PACA+2 

0030 


000670 

PACC 

EQD 

PACA+4 

0040 


000672 

P AC D 

EQD 

PACA+6 

0041 


0006*14 

PACE 

EQD 

PACA+B 

0042 


000676 

PA CP 

EQD 

PACA+10 

0043 




END 
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PROGRAM NAME: 

SOURCE: STVR 
BINARY: BSTVR 

ENTRY POINTS (location): STVRC 11024) 
GENERAL DESCRIPTION: 


This subroutine performs the detection and isolation of a gyro 
variance failure. This is accomplished by computing a set of variance 
degradation functions. When four of these functions have exceeded 
a certain limit, a variance failure is detected. Which functions have degraded 
determine which gyro is at fault. Once a gyro variance failure is detected 
and isolated, the gyro is put off-line by the controlling program STFL. 

No attempt at healing the failure is made. 


191 
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DATA ITEM DEFINITIONS 


ZPRV (ZPRV — ZPRV +11) Table of parity equation residuals from 

previous iteration. 


BETA (BETA— ►BETA +11) Table of variance failure detection functions. 


K1 (Kl) 


UBV (UBV) 


Constant used in computing variance failure 

detection functions, BETA 
, 2 

where o- = maximum parity equation 
residual variance. 

Constant used in testing variance failure 
detection function. If BETA, > UBV, then a 
degraded variance has been detected. 


LBV (LBV) 


NODG (NODG) 


Constant used in testing variance failure 
detection functions. If BETA. £. LBV, then 
the normal variance mode is confirmed. 
LBV = - UBV 

No. of BETA functions/iteration which 
have become degraded (4 needed for 
isolation). 


NINS (NINS) 


PICD (PICD) 


Arithmetic sum of the indices of those BETA 
Functions which have become degraded. 

Used in isolation of the failed gyro. 

First pass indicator (0 = lst pass, 

+ 1 = other than 1st pass). 
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MTCPDCOMP TELECOMMUNICATED DATA 



PDP- 

516 ASSEMBLY 

LISTING 


0001 




SOBS 

ZBT A 

000? 




SUBS 

ST VR 

0000 




PEL 


0004 

00000 

0 000000 

ST VP 

DAC 

** 

oro*? 

00001 

0 04 00271 


STA 

V P IN 

0006 

00002 

0 35 00304 


LDX 

=0 

0007 

00003 

140040 


CPA 


OCOB 

00004 

0 04 00270 


STA 

NODG 

0009 

00005 

0 04 00267 


STA 

NINS 

0010 

00006 

0 02 00266 


LDA 

PI CD 

001 1 

00007 

100040 


SZE 


001? 

000 10 

0 01 000?5 


UMP 

NINP 

0011 

0001 1 

000007 

VLP1 

DBL 


0014 

00012 

1 02 00622 


DLD 

7,1 

0015 

00013 

1 04 00230 


DST 

Z P F V , 1 

0016 

00014 

000005 


SGI, 


0017 

00016 

0 02 00000 


LDA 

0 

noil 

00016 

0 06 00303 


ADD 

= 2 

0019 

CO0 17 

0 04 00000 


STA 

0 

0020 

coo?o 

0 07 00271 


SUB 

VEIN 

0021 

00021 

100040 


SZE 


002? 

00022 

0 01 00011 


JSP 

VL PI 

0 02? 

00023 

0 12 00266 


TPS 

p 1 CP 

0024 

00024 

-0 01 00000 


JMP* 

5TVP 

0026 

00025 

000007 

NTNP 

DBL 


0026 

000 26 

1 02 00622 


DLD 

n 1 

LJ , 1 

0027 

00027 

1 07 00230 


DSB 

ZPEV, 1 

0020 

00030 

0 04 00224 


DST 

ATMP 

002? 

00031 

1 02 00622 


DLD 

Z, 1 

0010 

00032 

1 04 00230 


DST 

ZPFV,1 

0031 

00033 

0 02 00224 


DLD 

ATMP 

0032 

00034 

0 16 00272 


MPY 

ISP2 

0 0.3 3 

00035 

0 04 00226 


DST 

BTMP 

0034 

00 0 36 

0 02 00224 


DLD 

ATMP 

003* 

00037 

000201 


TAB 


0036 

00040 

0 16 00272 


MPY 

I S*2 

003' 7 

0004 1 

0401 61 


I PS 

15 

00 30 

00042 

0 06 00226 


DAD 

BTMP 

0039 

00043 

0411 71 


LLS 

7 

0040 

00044 

0 04 00724 


DST 

ATMP 

0041 

00045 

0 16 00224 


MPY 

ATMP 

0047 

00046 

0 04 00226 


DST 

BTMP 

0 043 

00047 

0 02 00224 


DLD 

ATMP 

0044 

00050 

000201 


I A B 


0045 

00051 

0 16 00224 


MPY 

ATMP 

0046 

00052 

0401 62 


LFS 

14 

0047 

000^3 

0 06 00226 


DAD 

BTMP 

0048 

00054 

0411 77 


LLS 

1 

0049 

00055 

1 06 00244 


DAD 

BETA, 1 

0050 

00056 

0 07 00264 


DSB 

K 1 

00*1 

00057 

1 04 00244 


DST 

BETA, 1 

0052 

00060 

0 07 00260 


DSB 

UBV 

0053 

00061 

1 00400 


SPL 


0064 

0 0062 

0 01 00073 


JMP 

NMCK 

0065 

00063 

0 12 00270 


TPS 

NODG 

0056 

00064 

000005 


SGL 


0057 

00065 

0 02 00000 


LDA 

0 
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MICFCCOMP TFLECOMHIJNICATED DATA 
DDP-5 1 6 ASSEMBLY LISTING 


nciRR 

00066 

0405 77 

ARS 

1 

005 Q 

00067 

0 06 00302 

ADD 

= 1 

006 0 

00070 

0 06 00267 

ADD 

NINS 

0061 

00071 

0 04 00267 

5TA 

NT NS 

0062 

0 0072 

0 01 00106 

J HP 

INVL 

006? 

00073 

1 02 00244 NKCK 

DLD 

BETA, 1 

0064 

00074 

0 07 00262 

DSB 

LBV 

0 065 

0 0 n 76 

0 11 00222 

CAS 

DBPO 

0066 

00076 

0 01 00106 

JHP 

INVL 

0 067 

00077 

0 01 00101 

J HP 

*+2 

0 06 R 

00100 

0 01 00104 

JHP 

* + 4 

O06Q 

00101 

000201 

IAB 


0070 

00102 

1 00040 

SZF 


007 1 

00103 

0 01 00106 

JHP 

INVL 

0077 

00104 

0 02 00222 

DLD 

DBPO 

n n7 3 

001 OS 

1 04 00244 

D ST 

BET A , 1 

0R7U 

00106 

000005 INVL 

SGL 


0 07R 

0 R 1 0 7 

0 02 00000 

LDA 

0 

0 076 

00110 

0 06 00303 

ADD 

= 2 

0 P 7*7 

00111 

0 04 00000 

STA 

0 

0 07 R 

00H2 

0 07 00271 

SOB 

VRTN 

007U 

00113 

100040 

SZE 


OORO 

0 0^14 

0 01 00025 

JHP 

NT NP 

OOR 1 

00 1 IS 

0 02 00270 

LDA 

NO DG 

f: 0 R 7 

00116 

0 07 00301 

SUB 

= 4 

OOR? 

0 0117 

100040 

SZE • 


oor ;i 

00120 

-0 01 00000 

JHP* 

ST VR 

0 OR R 

00121 

0 02 00640 

LDA 

FLST 

o 0 R 6 

00 122 

10ROUO 

SZF 


OOR7 

0 012 3 

0 01 00151 

JHP 

F2TS 

00 R R 

00124 

0 02 00300 

LDA 

=21 

r cr° 

00 12R 

0 07 00267 

SUB 

NINS 

OORR 

0 012 6 

0 07 00277 

SUB 

= 3 

PQR 1 

R0127 

101040 

SNZ 


n n op 

001 30 

0 01 00167 

JHP 

VEFL 

0 0° 3 

00131 

0 07 00303 

SUB 

= 2 

0 noii 

00132 

101040 

SNZ 


RODS 

00133 

0 01 00170 

JHP 

VDFL 

0 00 6 

O0134 

0 07 00302 

SUB 

= 1 

0097 

00136 

101040 

SNZ 


0090 

00136 

0 01 00166 

JHP 

VFFL 

0099 

00137 

0 07 00302 

SOB 

= 1 

0100 

00140 

101040 

SNZ 


0101 

00141 

0 01 00171 

J HP 

VC FL 

0102 

00142 

0 07 00277 

SUB 

=3 

01 0? 

00143 

101040 

SNZ 


0109 

00144 

0 01 00172 

JHP 

VEFL 

OIOS 

00146 

0 07 00302 

SUB 

= 1 

0106 

00146 

101040 

SNZ 


0107 

00147 

0 01 00173 

JHP 

V A FL 

0 7 OR 

00150 

-0 01 00000 

JHP* 

ST VR 

0 100 

00161 

0 02 00276 P2TS 

LDA 

= 15 

0110 

00152 

0 07 00267 

SOB 

NINS 

01 1 1 

00153 

0 04 00267 

STA 

NINS 

0112 

00154 

0 02 00275 

LDA 

=6 

0113 

00155 

0 07 00640 

SUB 

FLST 

Oil* 

00156 

0 11 00267 

CAS 

NINS 
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MTCPOCOMP TELECOMM UN ICATED DATA 
DDP-516 ASSEMBLY LISTING 


Oils 

00157 

101000 


NOP 


Oils 

00160 

0 01 00164 


JMP 

*+4 

0117 

00161 

0 02 00275 


L DA 

= 6 

oils 

00167 

0 07 00267 


SUB 

NINS 

Olio 

00163 

0 01 00174 


JMP 

EPOT 

0120 

00164 

0 02 00274 


LD A 

=7 

0121 

00165 

0 01 00162 


JHP 

*- 3 

0122 

00166 

141206 

VFFL 

AOA 


0123 

00167 

141206 

V EFL 

AOA 


0124 

00170 

141206 

VDFL 

AOA 


0125 

00171 

141206 

VCFL 

AOA 


012* 

00 172 

141206 

VEFL 

AOA 


0127 

00173 

141206 

V AFL 

AOA 


012P 

00174 

0 11 00316 

EPOT 

CAS 

*316 

0129 

001 75 

0 01 00177 


JHP 

* + 2 

0130 

00 176 

0 01 00204 


JHP 

NTVR 

0131 

001^7 

0 11 00317 


CAS 

« 317 

0132 

00200 

0 01 00202 


JHP 

*+2 

0 133 

00201 

0 01 00204 


JMP 

HTVR 

0134 

00202 

0 12 00000 


IPS 

ST VP 

0135 

00203 

-0 01 00000 


JHP* 

ST VR 

0136 

00204 

0 10 00000 

N"VP 

CALL 

7,BTA 

0137 

00205 

-0 01 00000 


JHP* 

STVR 

0130 

00206 

0 000000 

7IBT\ 

DAC 

** 

013 9 

00207 

000007 


DBL 


0 140 

00210 

0 35 00273 


LDX 

=-12 

0141 

00211 

0 02 00222 


DLD 

DBPO 

0142 

00212 

1 04 00260 

ZPFT 

dst 

RFTA + 

014? 

002 13 

0 12 00000 


IRS 

0 

0144 

00214 

0 12 00000 


TPS 

0 

0145 

00215 

0 01 00212 


JMP 

ZRBT 

0146 

00216 

000005 


SOL 


0147 

00217 

140040 


CPA 


014 5 

00220 

0 04 00266 


5TA 

Pi CD 

0149 

00221 

-0 01 00206 


JHP* 

ZBTA 

0150 

00222 

000000 

DBPO 

DBP 

0 


00223 

000000 




0151 

00224 

oooooo 

ATMP 

DBF 

0 


00226 

000000 




0152 

00226 

oooooo 

RTHP 

DBP 

0 


00227 

oooooo 




0153 

00230 

oooooo 

ZPRV 

BSZ 

12 


00231 

oooooo 





00232 

oooooo 





002 3 3 

oooooo 





00234 

oooooo 





00235 

oooooo 





00236 

oooooo 





00237 

oooooo 





00240 

oooooo 





00241 

oooooo 





00242 

oooooo 





00243 

oooooo 




0154 

• 00244 

oooooo 

BETA 

. BSZ 

12 


00245 

oooooo 





00246 

oooooo 





00247 

oooooo 
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MICFCCOMP TELECOMMUNICATED DATA 
DDP-5 1 6 ASSEMBLY LISTING 



00250 

000000 





00251 

000000 





00252 

000000 





00253 

oooooo 





00254 

000000 





0 0 2^5 

oooooo 





00256 

oooooo 





00257 

oooooo 




oiss 



* THE FOLI OWIING CONSTANTS ARE EOF 

0156 



* K 

EQUAL 

TO 2 

0157 



* SIGMA 

EQUAL TO 3.64 

0158 



# 

P 


01 59 

0026 0 

000363 

UBV 

DBP 

243. 528BB15 


00261 

041625 




0160 

00262 

177414 

LBV 

nBP 

”243. 52BBB15 


0026 3 

036153 




0161 

00264 

000022 

K 1 

DBP 

18. 368BB15 


0 0 2 6 c 

027432 




016? 



* END OF 

CONSTANTS 

016"* 

00266 

OOOOOO 

PICO 

DEC 

0 

0164 

00267 

OOOOOO 

NIKS 

DEC 

0 

0166 

00270 

OOOOOO 

NODG 

DEC 

0 

0166 

00271 

OOOOOO 

VEIN 

DEC 

0 

0167 

00272 

055205 

ISP2 

n EC 

0. 7 072 BO 

016R 


000622 

Z 

FQU 

*622 

0160 


000640 

FLST 

EQU 

»640 

01^0 

00273 

177764 


END 



00274 

000007 





00275 

000006 





00276 

000017 





00277 

000003 





00300 

000025 





00301 

000004 





O07Q2 

000001 





00 7 03 

000002 





00 304 

OOOOOO 
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PROGRAM NAME: 

SOURCE: SINX 
BINARY: BSINX 

ENTRY POINTS: (LOCATION): SINX (’11351), COSX (’11332) 

GENERAL DESCRIPTION: 

This subroutine will compute the sine or cosine of an angle 
depending on which entry point is called. The input to the subroutine is 
assumed to be a double precision angle in revolutions scaled B 0 in the 
A,B reg. The sine or cosine is returned in the A,B reg scaled Bl. In 
the case of the sine, the angle is first reduced to an equivalent angle 
between + ir. / 2. The sine is then computed using a 5 term series expansion. 

The cosine of the input angle is computed from the identity: cos x = sin^-g— - x) 
where x is the input angle. 
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MTCROCOHP TFL ECO* Wire AT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


ODDI 




SOBR 

SI NX 

OOQ? 




SUBR 

COSX 

000^ 




BEL 


ooou 

onooo 

0 OOOOOO 

COSX 

DAC 

** 

ooo c 

00001 

0 04 00140 


DST 

ARG 

ooof 

00002 

000005 


SGL 


noo7 

00003 

0 02 00000 


LDA 

COSX 

OOOF 

0 0 0 0 4 

0 04 00017 


STA 

SINX 

OOQO 

00005 

000007 


DBL 


0010 

00006 

0 02 00140 


DLD 

ARG 

0011 

00007 

1 C 1 400 


SHI 


0012 

00010 

’ 0 01 00014 


JHP 

* + 4 

non 

00011 

0 02 00142 


DLD 

DBPO 

0014 

00012 

0 07 00140 


DSB 

ARG 

non 

00013 

0 04 00140 


DST 

ARG 

0016 

00014 

0 02 00150 


DLD 

QRR7 

non 

00015 

0 07 00140 


DSB 

ARG 

0018 

00016 

100000 


SKP 


0010 

00017 

0 000000 

STNX 

DAC 

** 

0020 

0 00 20 

0 15 00164 


STX 

SVIN 

0 02 1 

00021 

0 04 00140 


DST 

ARG 

0022 

00022 

0 04 00132 


DST 

ATHP 

0 02 3 

00023 

140200 


FCB 


0024 

00024 

0411 77 


LLS 

1 

00 ? c - 

00025 

101001 


ssc 


0O?P 

00026 

0 01 00030 


JMP 

*♦2 

0077 

00027 

0 10 00116 


J ST 

PDAG 

0028 

00030 

0 04 00140 


DST 

ARG 

002c 

00031 

140200 


BCD 


0(00 

00032 

0411 77 


7LS 

1 

0031 

00033 

101001 


SSC 


0032 

00034 

0 01 00037 


JHP 

SINB 

0033 

00035 

0 10 00116 


J ST 

RD AG 

0034 

0 0 0 3 6 

0 04 00140 


DST 

APG 

003 7 

00037 

0 02 00140 

SI NB 

DLD 

ARG 

0038 

00040 

0 16 00140 


MPY 

ARG 

0 03 7 

A0O4 1 

0 04 00136 


DST 

ARG2 

0 07 8 

00042 

0 02 00140 


DLD 

ARG 

0078 

00047 

000201 


IAB 


0040 

00044 

0 16 00140 


HPY 

ARG 

ooui 

00045 

0401 62 


LBS 

14 

004? 

00046 

0 06 00136 


DAD 

ARG2 

coai 

00047 

0 04 00136 


DST 

ARG 2 

0044 

00050 

0 35 00165 


LDX 

= -B 

0045 

00051 

0 02 00152 


DLD 

CONS 

0046 

00052 

0 04 00134 


DST 

ACHL 

0047 

00053 

0 02 00136 

CMPL 

DLD 

ARG2 

0048 

00054 

0 16 00134 


NPY 

ACHL 

0047 

00055 

0 04 00132 


DST 

ATHP 

0050 

GO056 

0 02 00136 


DLD 

ARG 2 

0051 

00057 

000201 


TAB 


0052 

00060 

0 16 00134 


HPY 

ACHL 

0053 

00061 

0401 61 


LPS 

15 

0054 

00062 

0 06 00132 


DAD 

ATMP 

0057 

00063 

0 04 00132 


DST 

ATHP 

0056 

00064 

0 02 00134 


DLD 

ACHL 

0057 

00065 

000201 


IAB 
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MIC70C0"? TEI FCOMMONICATED DATA 



DDP - 

516 ASSEMBLY 

LISTING 


0053 

00066 

0 16 00136 


MPY 

ARG2 

0059 

00067 

0401 61 


IRS 

15 

0060 

00070 

0 06 00132 


DAD 

ATPIP 

0061 

00071 

1 06 00164 


DAD 

CONS* 10,1 

0062 

00072 

0 04 00114 


DST 

ACML 

0061 

00073 

0 12 00000 


TRS 

0 

0064 

00074 

0 12 00000 


TRS 

0 

0065 

00075 

0 01 00053 


JMP 

CMPL 

0066 

00076 

0 16 00140 


HPT 

ARG 

0067 

00077 

0 04 00132 


DST 

ATMP 

006 8 

00100 

0 C2 00114 


DLD 

ACML 

006 Q 

00 101 

000201 


TAB 


0070 

0010? 

0 16 00140 


MPY 

ARG 

0071 

00103 

0401 61 


LRS 

15 

0072 

00104 

0 06 00132 


DAD 

ATMP 

0071 

00105 

0 04 00132 


DST 

ATMP 

0074 

00106 

0 02 00140 


DLD 

ARG 

0076 

00107 

000201 


TAB 


0 076 

00110 

0 16 00134 


MPY 

ACML 

0077 

001 1 1 

0401 61 


IRS 

15 

0070 

001 1 2 

0 06 00132 


DAD 

ATMP 

0070 

00111 

0411 76 


LL5 

2 

0030 

001 14 

0 38 00164 


LDX 

SVIN 

008 1 

901 15 

-0 01 00017 


JMP* 

SINK 

OOP? 

00116 

0 oooooo 

RPAG 

DAC 

** 

OOP? 

on 1 17 

0 02 00140 


DIP 

ARG 

0 084 

00120 

101400 


SWT 


OOP 5 

00121 

C 01 00124 


JMP 

*+ 3 

0086 

00122 

0 02 00146 


DID 

MR PR 

0087 

00128 

0 01 00125 


JMP 

*+2 

0 08 3 

00124 

0 02 00144 


DLD 

HFR V 

0089 

0 012 5 

0 07 00132 


DSB 

ATMP 

oo°o 

00126 

0 04 00132 


DST 

ATMP 

0091 

00127 

0411 77 


LLS 

1 

00°2 

00130 

-0 01 00116 


JMP* 

RD AG 

0Q° 1 

001 32 

OOOOOO 

ATMP 

PBP 

0 


00133 

OOOOOO 




009 4 

00134 

oooooo 

ACM, 

DBP 

0 


00135 

oooooo 




0 09 5 

00136 

oooooo 

ARG2 

DBP 

0 


00137 

oooooo 




0096 

00140 

oooooo 

AFG 

DBP 

0 


00141 

oooooo 




0 097 

00142 

oooooo 

DBPO 

DBP 

0 


00143 

oooooo 




0098 

00 1 44 

040000 

HFR V 

OCT 

40000,0 


00145 

oooooo 




0099 

0M46 

140000 

MHFR 

OCT 

140000 ,0 


00147 

oooooo 




0100 

00150 

020000 

QRRV 

OCT 

20000,0 


00151 

OOOOOO 




0101 

00152 

000475 

CONS 

DEC 

0. 009694998BB0 


00153 

051672 




0102 

00154 

173155 


DEC 

-0.074780249BB0 


00156 

046350 




0103 

00156 

024315 


DEC 

0,318758717380 


00157 

005366 
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MICPOCOMP TELECOMMaNICATED DATA 
DDP-516 assembly listing 
0104 00160 126521 DEC 

00161 003723 

010^ 00162 031103 DEC 

00163 075522 

0106 00164 000000 SVIN DEC 

010“» 00165 177770 END 


-0. 64596371 1 1BB0 
0. 3926990796BB0 
0 
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PROGRAM NAME: 

SOURCE: MAL6 
BINARY: BMAL6 

ENTRY POINTS (LOCATION): FA LN (’11520) 

GENERAL DESCRIPTION: 

This subroutine calculates the small inertial frame rotations to 
fine align the quaternion to an inertial frame of Down, East and South. It 
uses the sum of delta velocity East and South over a one second interval 
to calculate these rotations. It employs a time varying filter for both 
levelling and azimuth alignment. The levelling has two gains, one for 
the first sixty seconds and the other after sixty seconds. Azimuth alignment 
starts three minutes after levelling starts and has a gain change seven minutes 
later or ten minutes after the fine align program starts. 

In this SIRU end-to-end program the fine alignment is scheduled 
to start at 260 seconds into the run, immediately after coarse alignment 
is complete. The following procedure is iterated once per second 

SDVE = 2 14 £ AV yi 
SDVS - 2 14 E AV ZI 

E AV XI = 0 
EAV yi = 0 
E AV ZI = 0 

(see source program VACU for scaling of EAV) 

0<t< 60 VPAE = 

VPBE = 

MZ 


a - -—) VPAE + SDVE 

(1 - JL) VPBE + VPAE 
43 

,-f^ VPBE + CONZ 
512 
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VPAS = (1 - ) VPAS + SDVS 

VPBS = (1 - —■) VPBS + y 6 VPAS 
MY = VPBS 


60 < t 


VPAE = (1 - g|) VPAE + SDVE 
VPBE = (1 - VPBE + | 2 VPAE 
MZ = tttttc VPBE + CONZ 


VPAS 

VPBS 

MY 


= (1 - VPAS + SDVS 
= (1 - L) VPBS + 1 VP 


0< t < 180 

MX = 0 

180< t< 600 

VPRD = (I - ^ 8 ) VPRD + 5 r2Q VPBS 
MX = - |- e VPRD + CONX 

600< t 

VPRD 
MX 

where MX, MY and MZ are the inertial angular commands used by 
program IRCO. CONX and CONZ are the nominal earth rate inertial angular 
commands used by IRCO for Down, East and South coordinates. 


* d - 5 -T2 )vprd + hi VPBS 

= - L VPRD + CONX 
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1 TCP 000 HP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0001 





EEL 


000? 





SOBR 

PALN 

0003 

00000 

0 

000000 

FALN DAC 

** 

0004 

00001 

000007 

DBL 


0005 

00002 

0 

02 

00450 

OLD 

• 450 

0005 

00003 

0411 

62 

LLS 

14 

0007 

00004 

0 

04 

00254 

DST 

SDVE 

0005 

00005 

0 

02 

00454 

DLD 

1 4 54 

0005 

00006 

0411 

62 

LLS 

14 

0010 

00007 

0 

04 

00256 

DST 

SDVS 

non 

00010 

0 

02 

00224 

DLD 

PBPO 

0012 

00011 

0 

04 

00444 

DST 

» 444 

0 01 .3 

00012 

0 

04 

00450 

DST 

■ 450 

0014 

0001 3 

0 

04 

004 54 

DST 

'454 

001 5 

00014 

0 

02 

00776 

DLD 

TIME 

0015 

00015 

0 

07 

00246 

D SB 

SI XT 

0017 

00016 

101400 

SMI 


001? 

00017 

0 

01 

00102 

JMP 

AP60 

001 p 

00020 

0 

n? 

00224 

DLD 

DBPO 

0020 

00021 

0 

07 

00226 

P SB 

VPAE 

002 1 

00022 

0401 

75 

LES 

3 

0022 

00023 

0 

07 

00226 

D SB 

VPAE 

0023 

00024 

0 

401 

76 

LRS 

2 

0024 

00025 

0 

06 

00226 

DAD 

VPAE 

0025 

00026 

0 

06 

00254 

DAD 

SDVE 

0 025 

00027 

0 

04 

00226 

DST 

VPAE 

0027 

00030 

0 

07 

00232 

DSB 

VPBE 

0 025 

00031 

0 

04 

00240 

DST 

TEMP 

002° 

000.32 

0 

401 

75 

LRS 

3 

0030 

00033 

0 

06 

002 4 0 

DAD 

TEMP 

0 031 

00034 

0 

401 

77 

LRS 

1 

0032 

00035 

0 

0 6 

0023? 

DAD 

VPBE 

003T 

00036 

0 

04 

00232 

DST 

VPBE 

0034 

00037 

0 

02 

00224 

DLD 

DBPO 

0035 

00040 

0 

07 

00230 

DSB 

VPAS 

0035 

0004 1 

0401 

75 

LRS 

3 

0037 

00042 

0 

07 

00230 

DSB 

VPAS 

0035 

00043 

0401 

76 

IRS 

2 

0035 

00044 

0 

06 

00 230 

DAD 

VPAS 

0040 

00045 

0 

06 

00256 

DAD 

SDVS 

0041 

00046 

0 

04 

00230 

DST 

VPAS 

0042 

00047 

0 

07 

00234 

DSB 

VPBS 

0043 

00050 

0 

04 

00240 

DST 

TEMP 

0044 

00051 

0401 

75 

LRS 

3 

0045 

0 006? 

0 

06 

00240 

DAD 

TEMP 

0 04 5 

00 0 53 

0 401 

77 

LRS 

1 

0047 

00054 

0 

06 

00234 

DAD 

VPBS 

0045 

00055 

0 

0 4 

00234 

DST 

VPBS 

0044 

00056 

0 401 

76 

LRS 

2 

0050 

00057 

0 

06 

00234 

DAD 

VPBS 

0051 

00060 

0 401 

76 

LRS 

2 

0 052 

00061 

0 

07 

00234 

DSB 

VPBS 

0053 

00062 

0401 

77 

IPS 

1 

0054 

0 006 3 

0 

07 

00234 

DSB 

VPBS 

0055 

00064 

0401 

74 

LES 

4 

0056 

00065 

0 

04 

00312 

DST 

MY 

0057 

00066 

0 

02 

00224 

DLD 

DBPO 
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MICPOCOMP TELECOMMUNICATED data 
ODP-516 ASSEMBLY LISTING 


0058 

00067 

0 07 

00232 


DSB 

VPBE 

0050 

00070 

0401 

76 


IF S 

2 

0060 

00071 

0 07 

00232 


DSB 

VPBE 

0061 

0007? 

0401 

76 


LRS 

2 

0062 

00073 

0 06 

00232 


DAD 

VPBE 

0061 

00074 

0401 

77 


LRS 

1 

0064 

00075 

0 06 

00232 


DAD 

VPBE 

0065 

00076 

0401 

74 


LRS 

4 

0066 

00077 

0 06 

00244 


DAD 

CONZ 

0067 

00100 

0 04 

00314 


DST 

MZ 

0068 

00101 

0 01 

00153 


J HP 

BF60 

0060 

00102 

000907 

AF60 

DBL 


omo 

00103 

0 02 

00226 


DLD 

VPAE 

001 1 

00104 

0401 

76 


LRS 

2 

0072 

00105 

0 0? 

00226 


DSB 

VPAE 

0077 

00106 

0 401 

74 


LRS 

4 

0074 

00107 

0 06 

00226 


DAD 

VPAE 

0 075 

00 1 10 

0 06 

00254 


DAD 

SDVE 

0076 

00111 

0 04 

00226 


DST 

VPAE 

0077 

00112 

0 07 

00232 


DSB 

VPBE 

0 078 

0011 3 

0 04 

00240 


DST 

TEMP 

0074 

0 0114 

0401 

77 


LRS 

1 

0080 

00115 

0 05 

00240 


DAD 

TEMP 

C 08 1 

00116 

040 1 

74 


LRS 

4 

0082 

001 17 

0 06 

00232 


DAD 

VPBE 

0087 

00120 

0 04 

00232 


DST 

VPBE 

0084 

00121 

0 0 2 

00230 


DLD 

VPAS 

0 085 

00122 

0401 

76 


IPS 

2 

0086 

0012? 

0 07 

00230 


DSB 

VPAS 

0087 

00124 

0401 

74 


LRS 

4 

0 08 8 

00125 

0 06 

00230 


DAD 

VPAS 

0080 

0 012 6 

0 06 

00256 


DAD 

SD VS 

0000 

00127 

0 04 

00230 


DST 

VPAS 

0091 

00130 

0 07 

00234 


DSB 

VPBS 

009? 

00 131 

0 04 

00240 


DST 

TEMP 

0097 

00132 

0401 

77 


LRS 

1 

00911 

00133 

0 06 

00240 


DAD 

TEMP 

0095 

00134 

0401 

74 


LRS 

4 

00<»6 

00138 

0 06 

00234 


DAD 

VPBS 

0097 

00136 

0 04 

00234 


DST 

VPBS 

OO^q 

00137 

0 02 

00224 


DLD 

DBPO 

0099 

00140 

0 07 

00234 


DSB 

VPBS 

0100 

0014 1 

040 1 

75 


LRS 

3 

0101 

00142 

0 07 

00234 


DSB 

VPBS 

010? 

00143 

0401 

67 


LRS 

9 

0103 

00144 

0 04 

00312 


DST 

MY 

0104 

00145 

0 02 

00232 


DLD 

VPBE 

0105 

00146 

0401 

75 


LRS 

3 

0106 

00147 

0 06 

00232 


DAD 

VPBE 

0107 

00150 

0401 

67 


LRS 

9 

01 09 

00151 

0 06 

00244 


DAD 

CONZ 

0109 

00152 

0 04 

00314 


DST 

MZ 

0110 

00153 

0 02 

00776 

BF60 

DLD 

TIME 

0111 

00154 

0 07 

00250 


DSB 

OR80 

01 12 

00155 

100400 


SPL 


0113 

00156 

0 01 

00221 


JMP 

LEVO 

0114 

00157 

0 07 

00252 


DSB 

FH20 
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MTCPOCOMP TET FCOMMOHICAT ED DATA 



PD n - 

516 ASSEMBLY 

LISTING 


01 in 

00160 

1 00400 


SPL 


011 

00161 

0 01 0^202 


JMP 

ORAG 

01 17 

00162 

0 02 00234 


DID 

VP BS 

01 1 Q 

00163 

0 07 00236 


nsB 

VFP.D 

0119 

00164 

0 04 00240 


PST 

TEMP 

0120 

00165 

0401 76 


LBS 

2 

012 1 

00166 

0 06 00240 


DAD 

TEMP 

0122 

00167 

0401 71 


LBS 

7 

0121 

00 170 

0 06 00236 


DAD 

VPFD 

0124 

00171 

0 04 00236 


DST 

VPRD 

0125 

0017? 

0 02 00224 


DID 

DBPO 

0126 

00171 

0 07 00236 


DSB 

VPPD 

0127 

00174 

0401 77 


IPS 

1 

0129 

00175 

0 07 00236 


DSB 

VPPD 

012a 

00176 

0401 74 


TBS 

4 

0110 

00177 

0 06 00242 


DAD 

CONX 

0111 

00 2 00 

0 04 00310 


DST 

MX 

0112 

00201 

0 01 00221 


JMP 

LEVO 

0111 

00202 

0 02 00234 

OB AG 

OLD 

YPBS 

0114 

0*12 01 

0 07 0O? 36 


DSB 

VPFD 

Oil* 

00204 

0 04 00240 


DST 

TEMP 

01.16 

00206 

0401 76 


T.PS 

n 

0117 

00206 

0 05 00240 


DAD 

TFMP 

0130 

00207 

0401 73 


LPS 

5 

01 3« 

00210 

0 06 00216 


DAD 

VPPD 

0140 

00711 

0 04 00236 


DST 

VPPD 

0 141 

00212 

0 02 00224 


DLD 

DBPO 

014 2 

00213 

0 07 00236 


DSP 

VPPD 

0143 

00214 

0401 77 


IRS 

1 

0144 

00215 

0 07 00236 


nsB 

VPPD 

0 145 

00216 

0401 76 


LPS 

1 

0146 

00217 

0 06 00242 


DAD 

CONX 

n yixi 

00220 

0 04 00.310 


DST 

MX 

0140 

00221 

000006 

I 57 0 

SGL 


0140 

00222 

-0 01 00000 


JMP* 

FALN 

oisn 

00224 

OOOOOO 

DBPO 

DRP 

0 


00225 

000000 




0151 

00? 26 

nnonoo 

VPAE 

DBP 

0 


00227 

ooonoo 




0152 

00230 

000000 

VP AS 

DBP 

0 


00231 

000000 




015.1 

00732 

OOOOOO 

VPBE 

DBP 

0 


002 33 

OOOOOO 




oinzj 

0 0234 

OOOOOO 

V PBS 

DBP 

0 


00736 

OOOOOO 




01 6 r - 

00236 

OOOOOO 

V PRD 

DBP 

0 


00737 

OOOOOO 




0 166 

00240 

OOOOOO 

TEMP 

DBP 

0 


00241 

OOOOOO 




Oim 

00242 

000004 

CONX 

OCT 

4, 7630 


00743 

007630 




0161 

00244 

000004 

CONZ 

OCT 

4, 41210 


00245 

041210 




0150 

00246 

OOOOOO 

SIXT 

DEC 

320 0 OB B 30 


00247 

076400 




0160 

00250 

onoooi 

OHBO 

DEC 

44000RB30 


00251 

025740 
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MICROCOHP TBLECOHHTJNICATEP DATA 



DDR 

-516 ASSEHBLY 

LIST 

ING 


0161 

00252 

00253 

000001 

022020 

FH20 

DEC 

42000BB30 

0162 

00254 

00255 

000000 

000000 

SDVE 

DBP 

0 

0163 

00256 

00257 

000000 

000000 

SD VS 

DBP 

0 

016 4 


000310 

HX 

EQO 

1 310 

0165 


000312 

NY 

EQU 

HX + 2 

0166 


000314 

HZ 

EQO 

HX4-4 

0167 

016* 


000776 

TIHE 

EQO 

END 

* 776 
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PROGRAM NAME 
SOURCE: COMP 
BINARY: BCOMP 

ENTRY POINTS: (location): COMP (’12000) 

GENERAL DESCRIPTION: 

After identification/ classification of a failure by IDEN, this 
subroutine will start to compute the constant bias/ ramp compensation to heal 
the failure. After 10 iterations, the recertification process is started via 
subroutine IDEN. Recompensation will stop as soon as the gyro has been 
recertified with the latest value of the bias. 
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( STRP ) 


GYEP. = B • MTOP 
-e m 

(convert meru/ 2 min to 
pulses /update/ 2 min) 


Subroutine to compute value 
of ramp bias for use after 
recertification 


C EXIT ) 
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DATA ITEM DEFINITIONS 


CMP^ 

(CM PI + 2) 

Iteration counter used in recompensation 
of a 1st failure 

cmpi 2 

(CMPI) 

Same as above except for a 2nd failure 

FLCD 1 

(PLCD + 2) 

gyro bias polarity indicator for 1st 
failure recompensation. (0 = gyro bias has 
the same sign as parity equation polarity, 

+ 1 = gyro bias has the opposite sign of the 
parity equation polarity) 

plcd 2 

(PDCD) 

same as above except for a 2nd failure 

BPRV X 

(BPRV + 2) 

Previous iteration's computed value for 
bias compensation of a 1st failure (parity 
equation bias rather than gyro bias) 

BPRV 

2 

(BPRV) 

same as above except for a 2nd failure 

ZSUMj 

(ZSUM + 2) 

Parity equation residual accumulator for 
a 1st failure. 

CM PL 

ZSUM, = Z Z c where p = 0 

1 6, P 

corresponds to the value of n at which 
the recompensation process starts. 

ZSUM 

& 

(ZSUM) 

Same as above except for a 2nd failure 

cmpi 2 

zsum 9 = S Z. 

2 p = 0 5, p 

YSUM 1 

(YSUM + 2) 

Parity equation residual transformation 
accumulator used in re compensating a 1st 
failure when it is a ramp type. 

ysum 2 

(YSUM) 

Same as above except for a 2nd failure ramp. 

B 1 

(B + 2) 

Computed value of the gyro compensation for 
a 1st failure. If the failure is of the constant 
bias type, B-^ is the bias in meru. If the 
failure is of the ramp type, is the slope 

in meru/ 2 min. 
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DATA ITEM DEFINITIONS (continued) 


MTOP 

MTP2 


ABIG e 


GYRP fl 

e 


(B) 

(MTOP) 

(MTP2) 


(A BIG-* A BIG +11 ) 


(GYRP+GYRP + 11) 


same as above except for a 2nd failure. 
Constant used to convert a gyro bias 
in meru to gyro bias in pulses /update. 

Constant used to convert a parity equation 
bias in meru to a gyro bias in pulses/ 
update (MTP2 = MTOP/cos or) 

Table of 6 compensation values, in pulses 
to be added to its corresponding gyro each 
update cycle (50 times/sec) 

Table of 6 ramp compensation values 
in pulses to be added to its corresponding 
ABIG e (see above) every 2 min. 
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*IC*CC01? TELECOMMUNICATED DA'i’A 



pop- 

516 ASSEMBLY 

LISTING 


0001 




SUBR 

COMP 

0002 




SUBR 

CHIN 

000? 




SUBR 

■ CMMV 

0004 




SUBR 

B 

noos 




SUBR 

BP2 

000* 




SUBR 

STRP 

0007 




SUBR 

GRHP 

00 OR 




SUBR 

PL CD 

OOOO 




SUBR 

PCP2 

0010 




SUBR 

GPBI 

0011 




REL 


0012 

ooooo 

0 000000 

COMP 

DAC 

** 

001 ? 

00001 

000007 


DPL 


0 01 4 

00007 

1 02 00316 


OLD 

CM P I, 1 

001* 

00003 

0 06 00364 


PAD 

D1B6 

001* 

00004 

1 04 00316 


DST 

CM PI, 1 

0017 

00006 

1 02 00356 


OLD 

PLCD , 1 

0 010 

00006 

100400 


SPL 


noio 

00007 

0 01 00012 


JMP 

*♦3 

0020 

00010 

1 02 40632 


DLD 

Z+8, 1 

0021 

0001 1 

0 01 000 1 u 


JHP 

*+ 3 

002? 

0O012 

0 02 00314 


DLD 

DBPO 

002? 

0001.3 

1 07 00632 


D SB 

Z+8,1 

0 0 ? 4 

0 0 014 

1 06 00322 


DAD 

BPRV, 1 

0025 

00016 

0 04 00312 


DST 

ZTMP 

0 076 

000 16 

1 02 00642 


DLD 

IDSW, 1 

0027 

00017 

1 00 40 0 


SPL 


0 02 R 

00020 

0 01 00076 


JMP 

RPCM 

0020 

00021 

1 02 00332 


DLD 

"SUM , 1 

0030 

00022 

0 06 00312 


DAP 

ZTMP 

0031 

00027 

1 04 00332 


nsi 

7 S !TM , 1 

00?? 

00024 

1 17 00316 


DTV 

CMPI, 1 

003? 

00025 

000201 


TAB 


0034 

00026 

140040 


CRA 


003 * 

00027 

000201 


IAB 


0076 

00030 

0401 72 


IRS 

6 

0037 

0003 1 

1 04 00322 


DST 

BPRV , 1 

noon 

u s.,1 j : i 

00032 

0 04 00.304 


DST 

ATMP 

0030 

000 33 

0 16 00366 


MPY 

TCOS 

0040 

00034 

1 04 00326 


DST 

B, 1 

0041 

00036 

0 02 00304 


DLD 

ATMP 

0042 

00036 

000201 


TAB 


0043 

000.37 

0 16 00366 


MPY 

ICOS 

0044 

00040 

0401 61 


LRS 

15 

0046 

0004 1 

1 06 00326 


DAD 

B , 1 

0 04 6 

00042 

0411 77 


LLS 

1 

0047 

00043 

1 04 00326 


DST 

B r 1 

0048 

00044 

0 16 00367 


MPY 

HTOP 

0040 

000 45 

0 04 00304 


DST 

ATMP 

0050 

00046 

1 02 00326 


DLD 

B, 1 

0051 

00047 

000201 


TAB 


0052 

00050 

0 16 00367 


MPY 

HTOP 

0063 

00051 

0401 61 


LRS 

15 

0054 

00052 

0 06 00304 


DAD 

ATMP 

0055 

00053 

0401 66 


LRS 

10 

0 0*6 

00054 

0 04 00304 

BMP A 

DST 

ATMP 

0057 

00065 

000005 


SGL 
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»TC°OCnMp TEISCOKHWVTCATED DATA 



PPP- 

516 ASSEMBLY 

LISTING 


005? 

00056 

0 02 00000 


LDA 

0 

005 q 

00057 

100040 


SZE 


0060 

00060 

0 01 00063 


JMP 

* + 3 

0061 

00061 

0 02 00641 


LDA 

FLSTM 

0062 

00062 

0 01 00064 


JMP 

*42 

006? 

0006? 

0 02 00640 


LDA 

FLST 

0064 

00 0 64 

0 07 00465 


SUB 

= 1 

0065 

00066 

0415 77 


ALS 

1 

0066 

00066 

0 04 00000 


STA 

0 

0067 

no 06 7 

000007 


DBL 


0066 

00070 

1 02 00422 


TLD 

ABIG, 1 

006? 

00071 

0 07 00304 


0 SB 

ATMP 

00^0 

00072 

1 07 00422 


DSB 

ABIG, 1 

0071 

00072 

1 OU 00422 


PST 

APX9 , 1 

0 07? 

00074 

00000? 


SGL 


007? 

00075 

-0 01 00000 


JMP* 

COMP 

0 07a 

00076 

1 02 00316 

BP CM 

DL D 

CMP I, 1 

0 07 c ' 

09077 

0 07 00^64 


DSB 

D1 B6 

0 076 

00100 

0 04 00306 


DST 

BTMP 

007*f 

00101 

100040 


SZE 


0076 

00102 

0 01 00106 


.tup 

NTP 1 

007 q 

00102 

0 02 00312 


OLD 

ZTMP 

oopo 

00104 

1 04 00332 


DST 

ZSUM, 1 

OOP 1 

0010^ 

-0 01 00000 


OMP* 

CO F!P 

OOP? 

00106 

0 06 00362 

NT PI 

DAD 

DHB6 

OOP? 

00107 

0 04 00310 


DST 

CTMP 

f 0R4 

00110 

n 02 00312 


OLD 

7TM9 

0086 

00111 

0 16 00306 


MPY 

BTMP 

0086 

00112 

0 04 00394 


DST 

ATMP 

OOP 7 

001 T* 

0 02 00312 


DLD 

2TM? 

OOPS 

0 0114 

000201 


TAB 


00R q 

00116 

0 16 00306 


MPY 

BTMp 

00 q 0 

00116 

0401 61 


L PS 

15 

0091 

00117 

0 06 00304 


DAD 

ATMP 

009? 

00120 

0411 72 


LLS 

6 

0092 

00121 

0 04 00304 


DST 

ATMP 

no q u 

0012? 

1 02 00332 


DLD 

ZSUM, 1 

0095 

0 0 1 2 2 

0 07 00304 


DSB 

ATM? 

00 q 6 

00124 

0 17 00310 


DIV 

CTMP 

0097 

00125 

000201 


TAB 


0090 

00126 

14 00 40 


CPA 


00 qo 

00127 

000201 


TAB 


0100 

00130 

0401 72 


LFS 

6 

Old 

00121 

1 06 00336 


DAD 

YSPM, 1 

0102 

00132 

1 04 00336 


DST 

YSUH, 1 

010? 

00133 

1 02 00316 


OLD 

CM PI ,1 

0104 

00134 

0 06 00364 


DAD 

D1B6 

0105 

00135 

0 04 00310 


DST 

CTMP 

01 06 

00136 

0 16 00306 


MPY 

BTMP 

0107 

00137 

0 04 00306 


DST 

BTMP 

0108 

00140 

0 02 00314 


DLD 

DBPO 

010? 

00 14 1 

1 07 00336 


nsp 

YSTJM,1 

01 10 

00142 

0 17 00306 


DIV 

BTMP 

0111 

00143 

000201 


IAB 


0112 

0 014 4 

140040 


CPA 


mi? 

00146 

000201 


TAB 


0114 

00 146 

0401 67 


LSS 

9 
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MTC^OCOMP TET BCOMM'JNICAT FD DATA 



PDP- 

516 ASSEMBLY 

LISTING 


r>1 1 r ' 

00147 

0 04 00304 


DST 

AT MP 

on R 

no i so 

0 16 00366 


MPY 

ICOS 

oil"' 

00151 

1 04 00326 


DST 

P,1 

0119 

00 152 

0 02 00304 


DLD 

ATNP 

011^ 

0015 3 

000201 


TAB 


0120 

00 1 SU 

0 16 00366 


MPY 

ICOS 

0121 

00155 

0401 61 


LBS 

15 

0122 

00166 

1 06 00326 


DAD 

B,1 

(5123 

00 167 

1 04 00326 


DST 

B, 1 

oi 24 

00160 

1 02 00332 


DID 

7,SDM,1 

01 26 

00161 

0 06 00312 


DAD 

ZTMP 

0126 

00162 

1 04 00332 


DST 

ZS0M,1 

0 1 2 7 

00163 

1 17 00316 


DTV 

CM PI, 1 

0129 

00164 

000201 


TAB 


0120 

00166 

140040 


CR A 


0130 

00 166 

000201 


TAB 


on i 

00167 

0401 7? 


LBS 

6 

013 2 

00 170 

0 04 00306 


DST 

ETMP 

0137 

00171 

0 02 00304 


DLD 

ATMP 

0124 

00 172 

0 16 00310 


IP Y 

(•TMt) 

0 13 r ' 

00173 

n 04 00312 


DST 

ZTMP 

on o 

00 174 

0 07 90304 


DID 

A T * P 

om 

00175 

090201 


TAB 


0130 

n o 1 7 6 

0 1 6 00910 


y 

CTMP 

013° 

00177 

0401 61 


LBS 

15 

0 140 

00200 

0 06 00212 


DAD 

7T **P 

014 1 

00701 

0411 74 


T.IS 

4 

0 14? 

00202 

0 06 00306 


DAD 

BT MP 

oi a o 

00203 

1 04 0032? 


DST 

RPPV, 1 

014 4 

00704 

0 04 00304 


DST 

ATMP 

0 14 0 

00 206 

0 16 00970 


MPY 

MTP 2 

0146 

00206 

0 04 00310 


DST 

CTMP 

0147 

00207 

0 02 00304 


DLD 

ATMP 

0140 

00210 

000201 


TAB 


0140 

non i 

0 16 00370 


MPY 

MTP 2 

0 1 oo 

00217 

0401 61 


IPS 

15 

01 01 

0 021 7 

0 06 00310 


DAD 

CTMP 

on? 

0 0214 

0401 67 


IPS 

Q 

oin 

00? 1 r 

0 01 00054 


.IMP 

°MP A 

0 104 

0 o p i f 

C none on 

CMry 

DAC 

** 

01 56 

o o n 7 

000007 


DBL 


0 1 C S 

0 (> 2 2 0 

101040 


SNZ 


om 

00221 

n 01 00224 


JMP 

* + 3 

0 1 o ° 

0 0 ? 2 2 

0 02 00314 


DLD 

DBPO 

oi r n 

00723 

1 04 00322 


DST 

BPFY, 1 

0160 

00224 

0 02 00314 


DLD 

DB °0 

0161 

00226 

1 04 00316 


DST 

CflPI, 1 

016? 

00226 

1 Cu 09332 


DST 

zsn*i,i 

0161 

00227 

1 04 00336 


DST 

YSHfl, 1 

0164 

00230 

000005 


SGL 


0166 

00231 

-0 01 00216 


JMP* 

CM IN 

0166 

00231 

0 000000 

CMM V 

DAC 

** 

0167 

00233 

000007 


DBL 


0169 

002.34 

0 02 00316 


DLD 

CM PI 

0169 

00235 

0 04 00320 


DST 

CMPI+2 

0 170 

00236 

0 02 00332 


DLD 

7SDM 

0171 

00237 

0 04 00334 


DST 

ZSUM + 2 
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MTCPCCOMP TELECOMMUNICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


017? 

00240 

0 02 00326 


DLD 

P 

01*73 

00241 

0 QU 00330 


DST 

B+2 

0174 

00242 

0 02 00336 


DLD 

YSUM 

0175 

00243 

0 04 00340 


DST 

YSTTH4-2 

0176 

00244 

0 02 00356 


DLD 

PLOD 

0177 

00245 

0 04 00360 


DST 

PLCD+2 

0178 

00246 

0 02 00322 


DLD 

BPRV 

0179 

00247 

0 04 00324 


DST 

BP R 2 

niBo 

00250 

000005 


SGL 


0181 

00261 

-0 01 00232 


3 HP* 

CKHY 

0182 

00252 

0 000000 

STRP 

DA C 

** 

0183 

00253 

1 02 00326 


DLD 

B, 1 

0 IB 4 

00254 

0 16 00367 


MPY 

MTOP 

0186 

00255 

0 04 00304 


DST 

ATMP 

0186 

00256 

1 02 00326 


DLD 

B,1 

0187 

00257 

000201 


I A B 


0188 

00260 

0 16 00367 


MPY 

KTOP 

0189 

00261 

0401 61 


LR5 

15 

0190 

00262 

0 06 00304 


DAD 

ATMP 

0191 

00263 

0401 66 


LRS 

10 

0 1 °2 

00264 

0 04 00304 


DST 

ATMP 

0193 

00266 

000005 


SGL 


0194 

00266 

0 02 0O000 


LDA 

0 

0195 

00267 

100040 


SZE 


0198 

00270 

0 01 00273 


JMP 

*+ 3 

0197 

00271 

0 02 00641 


LDA 

FLST+ 1 

0198 

00272 

0 01 00274 


JMP 

*♦2 

0 1 Q 9 

00273 

0 02 00640 


LDA 

PL ST 

0200 

00274 

0 07 00465 


SUB 

= 1 

0201 

00275 

0416 77 


ALS 

1 

0202 

90276 

0 04 00000 


STA 

0 

0203 

00277 

000007 


DBL 


0204 

00300 

1 0? 00342 


DLD 

GYRP, 1 

0206 

00.301 

0 05 00304 


DAD 

ATMP 

0206 

00302 

1 04 00342 


DST 

GYRP, 1 

0207 

00303 

-0 01 00252 


J HP* 

STRP 

0208 

00304 

000000 

A TIP 

DBP 

0 


00305 

oonooo 




0209 

00306 

000000 

BTMP 

DBP 

0 


00307 

000000 




0210 

0 0310 

oooooo 

CTMP 

DBP 

0 


00311 

000000 




0211 

00312 

oooooo 

ZTMP 

DBP 

0 


00313 

oooooo 




0212 

00314 

oooooo 

08P0 

DBP 

0 


00315 

oooooo 




0213 

00316 

oooooo 

CMPI 

BSZ 

a 


0 031 7 

oooooo 





00320 

oooooo 





00321 

oooooo 




0214 

00322 

oooooo 

BPFV 

BSZ 

4 


00323 

OOOOOO ■ 





00324 

oooooo 





00325 

oooooo 




0216 

00326 

oooooo 

B 

BSZ 

2 


00327 

oooooo 




0216 

00330 

oooooo 

BP2 

DBP 

0 
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MICPOCOMP TELECOMMUNICATED DATA 



npp- 

516 ASSEMBLY 

LISTING 


003 31 

000000 



0217 

00332 

oooooo 

ZSTIM 

BSZ 


00333 

000000 




00334 

OOOOOO 




00335 

oooooo 



02 IB 

00 336 

oooooo 

Y SUM 

BSE 


0033"* 

oooooo 




00340 

oooooo 




00341 

oooooo 



0 21° 

00342 

oooooo 

GYRP 

RSZ 


00343 

oooooo 




00344 

oooooo 




00345 

oooooo 




00 346 

nooooo 




0034 7 

oooooo 




00 350 

oooooo 




00351 

oooooo 




00352 

oooooo 




00353 

oooooo 




0 0 354 

oooooo 




00355 

oooooo 



0220 

00 356 

oooooo 

PICO 

BSZ 


00357 

oooooo 



0221 

00360 

oooooo 

PCP2 

BSE 


0 0 3 61 

nooooo 



0222 

00 36 q 

0C0400 

DHB6 

DEC 


00363 

oooooo 



0 22 2 

00 36 4 

001000 

D1B6 

DEC 


00365 

oooooo 



0224 

0f)366 

045475 

ICOS 

DEC 

0276 


* CONST P NT 

0226 

00367 

071216 

MTQT> 

DEC 

0727 



* CONSTANT 

0 27? 

00370 

041525 

MTP2 

DEC 

0?? q 


000646 

CM PE 

EQU 

0210 


000650 

CPI 

EQU 

02 31 


000622 


ECU 

0232 


00064? 

ID5H 

BQTJ 

0233 


000640 

FLST 

EQU 

0334 

00371 

0 oooooo 

GPBI 

DAC 

0235 

00372 

100020 


SRI 

0236 

00373 

-0 01 00371 


JMP* 

02 ? “* 

00374 

000007 


DRL 

o 

00 3 75 

0 07 00422 


OLD 

n?3Q 

00 376 

0 06 00400 


DAD 

0740 

00 377 

0 04 00400 


DST 

024 1 

00400 

0 02 00424 


DLD 

0 2 42 

00401 

0 06 00402 


DAD 

024 ^ 

00402 

0 04 00402 


DST 

024U 

004 0 3 

0 02 00426 


DLD 

0246 

00404 

0 06 00404 


DAD 

0246 

004 05 

0 04 00404 


DST 

024 7 

00406 

0 02 00430 


DLD 

0 24S 

00407 

0 06 00406 


DAD 

0249 

004 10 

0 04 00406 


DST 

0250 

00411 

0 02 00432 


DLD 

0751 

00412 

0 06 00410 


DAD 


4 


4 


12 


2 

2 

0 . 5 BBS 
1 BE 6 

1.1756B1 

TO CONVEPT JtEP T! TO POT. SF S/UP DA TF 
0.ft828E-5B-17 

EQUAL TO ABOVE CONSTANT TIMES 1/COS 
0.8027E-5B-16 
*646 
*650 
* 622 
*642 
*640 
** 

ORBI 

ABIG 
GAPC 
G A PC 
BBIG 
GB PC 
GBPC 
CBIG 
GCPC 
GC PC 
DBIG 
GDPC 
GDPC 
EBIG 
GEPC 


218 



MICPOCOHP TELECOMMUNICATED DATA 



ASSEMBLY 

LISTING 

026? 

0041 ? 

0 04 00410 


DST 

0253 

00414 

0 02 00434 


DLD 

0254 

00415 

0 06 00412 


DAD 

0255 

00416 

0 04 00412 


DST 

0256 

00417 

000005 


SGL 

02*7 

00420 

-0 01 00371 


IMP* 

0258 

00422 

000000 

ABIG 

DBP 


0042 3 

OOOOOO 



025? 

00424 

000000 

BBIG 

DBP 


00425 

000000 



0260 

00426 

000000 

CBIG 

DBP 


00427 

000000 



0261 

00 4 30 

000000 

DBIG 

DBP 


004 91 

000000 



0 26? 

00492 

000000 

EBIG 

DBP 


004 33 

noQOOO 



026 1 

00434 

OOOOOO 

F8TG 

DBP 


004 3* 

OOOOOO 



026 4 


000400 

GA PC 

ECU 

026 5 


000402 

GBPC 

EQU 

0266 


000404 

acre 

eod 

02*7 


000406 

GDPC 

EQIT 

0260 


0004 10 

GEPC 

EQU 

02 6? 


000412 

GFPC 

E(Ht 

0 270 

0 0 4 9 6 

0 OOOOOO 

G PM P 

DAC 

0? 7 1 

OO'lV 7 

0 35 00464 


LDX 

0272 

00440 

000007 


DBL 

0273 

00 4 41 

0 02 00776 


DLD 

027U 

0 04 4 2 

0 07 00460 


DSB 

02?9 

00443 

100400 


SPL 

0276 

0 0 4 4 4 

0 01 00456 


J HP 

027? 

00445 

0 02 00462 


DLD 

0278 

00446 

0 06 00460 


DAD 

027? 

0 04 47 

0 04 00460 


DST 

020" 

00450 

1 02 00436 

GPLP 

DLD 

0201 

00451 

1 0? 00356 


DSB 

0282 

00452 

1 04 00436 


DST 

0293 

004 5 ? 

0 12 00000 


IPS 

0284 

00454 

0 12 00000 


I R.S 

0205 

004 55 

0 01 00450 


J HP 

0236 

00 4 56 

000005 

OFOT 

SGI 

023? 

0 045? 

-0 01 00496 


JMP* 

0299 

0 04 6 0 

OOOOOO 

TTMP 

DBP 


00461 

OOOOOO 



029? 

00462 

OOOOOO 

TMIN 

OCT 


00463 

027340 



0290 

00464 

177764 


END 


00465 

000001 




GEPC 
P8IG 
GF PC 
GEPC 

GRBI 

0 

0 

0 

0 

0 

0 

• 400 
GAPC+2 
gbpc+2 
GCPC+2 
GDPC. + ? 
GEPC+2 
** 

= -12 

•776 

TTHP 

GPOT 

TMTN 

TTMP 

TTMP 

ABTG+12,1 
GYPP+12, 1 
ABIG+12 ,1 
0 
0 

GPL? 

GF HP 
0 

0,27340 
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PROGRAM NAME: 

SOURCE: GPUA 
BINARY: BGPAC 

ENTRY POINTS (LOCATION): GPAC (’12466) 

GENERAL DESCRIPTION: 

This subroutine accumulates gyro pulses for the failure isolation, 
detection, classification and recertification programs in this system. It 
also accumulates A# body (D|a 9 b |) for the X,Y and Z axes, used to raise 
the TSE limit for dynamic environments. 
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MTCPOCOFP TELECOMMUNICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0001 




PEL 


0002 




SUBR 

GPAC 

0003 

00000 

0 000000 

GPAC 

DAC 

** 

0000 

00001 

000007 


DBL 


000'S 

00002 

0 02 00400 


DID 

GAPC 

0006 

00003 

0401 61 


LRS 

15 

0007 

00004 

0 06 00330 


DAD 

GACA 

0008 

00005 

0 04 00330 


DST 

GACA 

000 Q 

00006 

0 02 00402 


DLD 

GBPC 

0010 

00007 

0401 61 


LRS 

15 

0011 

00010 

0 06 00332 


DAD 

GACB 

0012 

00011 

0 04 00332 


DST 

GACB 

0013 

00012 

0 02 00404 


DLD 

GCPC 

0014 

0 0 013 

0401 61 


LRS 

15 

001 ^ 

00 014 

0 06 00334 


DAD 

GACC 

0016 

00015 

0 04 00334 


DST 

GACC 

0017 

00 016 

0 02 00406 


DLD 

GDPC 

0013 

0 0 0 1 7 

0401 61 


LPS 

15 

001 o 

0 0 0 2 0 

C 06 00336 


DAD 

GACD 

0020 

00021 

0 04 00336 


DST 

GACD 

0021 

00022 

0 02 00410 


DLD 

GEPC 

002° 

00023 

0401 61 


LRS 

15 

00?t 

00024 

0 06 00340 


DAD 

GACE 

0024 

00025 

0 04 00340 


DST 

GACE 

002 6 

00026 

0 02 00412 


DLD 

GFPC 

0026 

00027 

0401 61 


LRS 

15 

0027 

00030 

0 06 00342 


DAD 

GACF 

0023 

00031 

0 04 00342 


DST 

GACF 

0020 

000.32 

000005 


SGI 


0030 

000 33 

0 02 00414 


LDA 

DTX 0 

0031 

00034 

100400 


SPL 


0 0 3 ^ 

000.35 

1 40407 


TCA 


0033 

00036 

0 04 00056 


ST A 

STSE 

0034 

00037 

0 02 00416 


LDA 

DTYB 

0033 

00040 

1 00400 


SPL 


0 03 6 

0004 1 

1 40407 


TCA 


0037 

00042 

0 06 00056 


ADD 

STSE 

C 03 ^ 

00^43 

0 04 00056 


STA 

STSE 

0 03 n 

00044 

0 02 00420 


LDA 

DTZB 

0040 

00046 

100400 


SPL 


0041 

09046- 

140407 


TCA 


0042 

00047 

0 06 00056 


ADD 

STSE 

0 04 3 

00050 

000007 


DBL 


0044 

00051 

0401 61 


LRS 

15 

004 5 

0 0052 

0 06 00574 


DAD 

SUDT 

0046 

00 0 53 

0 04 00574 


DST 

SUDT 

com 

00 054 

000005 


SGL 


0 0 48 

000 55 

-0 01 00000 


JMP* 

GPAC 

0049 


000400 

GAPC 

ECU 

* 400 

0050 


000402 

GBPC 

EQU 

GAPC+2 

0051 


000404 

GCPC 

EQU 

GAPC+4 

006? 


000406 

GDPC 

EQU 

GAPC + 6 

0063 


000410 

GEPC 

EQU 

GAPC+8 

0054 


000412 

GFPC 

EQU 

GAPC* 1 0 

0055 


000330 

GACA 

EQU 

'330 

0066 


000332 

GACB 

EQU 

GACA+2 

0067 


000334 

G ACC 

EQU 

GACA+4 
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MTCEOCOMP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


00 68 

000336 

GACD 

EQO 

GACA+6 

00 ^° 

000340 

GACE 

EQU 

GACA+8 

0060 

000342 

GACF 

EQO 

GACA*10 

0061 

000414 

DTYB 

EQO 

* 414 

0062 

000416 

DTYB 

EQO 

DTXB*2 

0063 

000420 

DTZB 

EQO 

DTXB+4 

0064 

000574 

StJDT 

EQO 

•574 

0068 00056 

000000 

STSE 

OCT 

0 

0066 



END 
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PROGRAM NAME 
SOURCE; AZCA 
BINARY: BAZCA 

ENTRY POINTS (location):AZCA ('12546) 

GENERAL DESCRIPTION: 

This subroutine performs the final portion of the coarse align 
sequence; Azimuth alignment. As input, it uses the 200 sec worth of 
accumulated and filtered A V pulses from subroutine SVFL. It first computes 
the level frame -to -navigation frame quaternion' LQN. It then computes the 
desired body frame-to-navigation frame quaternion BQN by quaternion 
multiplication: 


BQN - LQN(BQL) 

Where BQL is the quarternion computed in the leveling subroutine 
LUCA. BQN becomes the new system quarternion. 
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Azimuth Alignment 
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MICROCOMP TELECOMMUNICATED DATA 


DDP-5 1 6 ASSEMBLY LISTING 


0001 


S0BR 

0002 


REL 

0003 00000 

0 OOOOOO AZCA DAC 

0004 00001 

000007 

DBL 

0005 00002 

-0 02 00422 

DLD* 

0006 00003 

-0 07 00423 

D SB* 

0007 00004 

0411 76 

LLS 

0008 00005 

0 04 00366 

D ST 

0009 00006 

000101 

NRM 

0010 00007 

000005 

SGL 

0011 00010 

0 04 00370 

STA 

0012 00011 

000041 

SC A 

0013 00012 

0 04 00376 

STA 

0014 00013 

0 02 00370 

LDA 

0015 00014 

000007 

DBL 

0016 00015 

0 04 00370 

D ST 

0017 00016 

-0 02 00421 

DLD* 

P01 8 00017 

-0 07 00420 

DSB* 

0014 00020 

0411 76 

LLS 

0020 00021 

0 04 00364 

DST 

0021 00022 

000101 

NRM 

0022 00023 

000005 

SGL 

0021 0002U 

0 04 00372 

STA 

0024 00025 

000041 

SCA 

0025 00026 

0 04 00377 

STA 

0026 00027 

0 02 00372 

LDA 

0027 00030 

000007 

DBL 

0028 00031 

0 04 00372 

DST 

0029 00032 

000005 

SGL 

0030 00033 

0 02 00376 

LDA 

0031 00034 

0 11 00377 

CAS 

0032 00035 

0 01 00040 

JMP 

0033 00036 

101000 

NOP 

0034 00037 

0 01 00047 

JMP 

0035 00040 

0 02 00377 

EXCH LDA 

0036 00041 

0 04 00376 

STA 

OO?" 7 00042 

000007 

DBL 

0038 00043 

0 02 00372 

DLD 

0039 00044 

0 04 00370 

DST 

0040 00045 

0 02 00366 

DLD 

0041 00046 

0 01 00051 

JMP 

0042 00047 

000007 

LDBT DBL 

0043 00050 

0 02 00364 

DLD 

0044 00051 

0 04 00372 

DST 

00^5 00052 

000005 

SGL 

0046 00053 

0 02 00376 

LDA 

0047 00054 

140407 

TCA 

0048 00055 

0 03 00425 

ANA 

0049 00056 

0 05 00424 

ERA 

0050 00057 

0 04 00062 

STA 

0051 00060 

000007 

DBL 

0052 00061 

0 02 00372 

DLD 

0053 00062 

0411 00 

LSH A LLS 

0054 00063 

0 04 00372 

DST 

0055 00064 

0 16 00372 

MPY 

0056 00065 

0401 76 

LRS 

0057 00066 

0 04 00374 

DST 


AZCA 

** 

S3C 

S4C 

2 

SVFY 


TMPA 

S Hf 1 
TMPA 

TMPA 

52C 

SIC 

2 

SVFZ 


TMPB 

SHF2 

TMPB 

TMPB 

SHFl 
SHE 2 
EXCH 

LDBT 

SHF2 

SHF1 

TMPB 

TMPA 

SVFY 

LDBT+2 

SVFZ 

TMPB 

SHF 1 

= •00077 
= *41100 
LSH A 

TMPB 

** 

TMPB 

TMPB 

2 

STMP 
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"TCRCCOHP TELECOBHtJNIC AT ED DATA 



ODP- 

516 ASSEMBLY 

LISTING 


oosq 

00067 

0 02 

00372 


DLD . 

THPB 

0059 

00070 

000201 


IAB 


oooo 

00071 

0 16 

00372 


SPY 

THPB 

0061 

0007? 

0401 

60 


LBS 

16 

0062 

00073 

0 06 

00374 


DAD 

STEP 

006? 

00074 

0 04 

00374 


DST 

STEP 

0064 

00075 

0 02 

00370 


DLD 

THPA 

0065 

00076 

0 16 

00370 


MPY 

TBPA 

0066 

00077 

0401 

76 


LRS 

2 

0067 

00100 

0 06 

00374 


DAD 

ST HP 

0069 

00101 

0 04 

00374 


DST 

STHP 

0069 

00102 

0 02 

00370 


DLD 

THPA 

0070 

0010? 

000201 


IAB 


non 

00104 

0 16 

00370 


HPY 

THPA 

0072 

00105 

0401 

60 


I.RS 

16 

0073 

00106 

0 06 

00374 


DAD 

STHP 

007U 

80107 

0 10 

00000 


CALL 

DSQR 

0075 

00110 

0 04 

00374 


DST 

STHP 

0076 

00111 

000005 


SGL 


0077 

001 12 

0 02 

00376 


LDA 

SHF 1 

0 078 

00113 

140407 


TCA 


0079 

00114 

0 03 

00425 


ANA 

= •00077 

0080 

00115 

0 05 

00424 


ERA 

=•41100 

OOS1 

00116 

0 04 

00121 


STA 

LSHB 

0 082 

00117 

000007 


DBI- 


0 083 

00120 

0 02 

00366 


DLD 

SVFY 

0034 

00121 

0411 

00 

LSH9 

LLS 

** 

0 0R5 

00122 

0401 

75 


LBS 

3 

0086 

00123 

0 17 

00374 


DIV 

STHP 

OOR* 7 

00124 

0401 

61 


LPS 

15 

0088 

0 0 1 2 c ' 

0411 

61 


LIS 

15 

0089 

00126 

0 04 

00374 


DST 

STHP 

0090 

00127 

0 02 

00400 


DLD 

DBL1 

0091 

00130 

0 07 

00374 


DSB 

STHP 

0099 

00131 

0401 

77 


LBS 

1 

009? 

00132 

0 10 

00000 


CALL 

DSQF 

0094 

00133 

0 04 

00404 


DST 

E 

0095 

00134 

0 02 

00374 


DLD 

STHP 

0 096 

00135 

0 06 

00400 


DAD 

DBL1 

0097 

00136 

0401 

77 


LBS 

1 

0098 

00137 

0 10 

00000 


CALL 

dsqb 

0099 

00140 

0 04 

00406 


DST 

JX 

0100 

00141 

0 02 

00402 


DLD 

DBLO 

0101 

00142 

0 07 

00364 


DSB 

SVFfc 

010? 

00143 

101400 


SHI 


010.3 

00144 

0 01 

00150 


JMP 

QRTC 

0104 

00 145 

0 02 

00402 


DLD 

DBLO 

010^ 

00146 

0 07 

00406 


DSB 

JX 

0106 

00147 

0 04 

00406 


DST 

JX 

0107 

00150 

0 02 

00460 

QPTC 

DLD 

LI 

0108 

00151 

0 16 

00404 


HPY 

E 

0109 

00152 

0 04 

00410 


DST 

El 

0110 

00153 

0 02 

00460 


DLD 

LI 

0111 

00154 

000201 


TAB 


0112 

00155 

0 16 

00404 


BP Y 

E 

0113 

00156 

0401 

61 


LRS 

15 

0114 

00157 

0 06 

00410 


DAD 

El 
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MICPOCOMP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


0115 

00160 

0 04 

00410 

DST 

El 

0116 

00161 

0 0? 

00404 

DLD 

E 

0117 

00162 

000201 

IAB 


01 1R 

00163 

0 16 

00460 

MPY 

LI 

01 10 

00164 

0401 

61 

LRS 

15 

0120 

00165 

0 06 

00410 

DAD 

El 

0121 

00166 

0 04 

00410 

DST 

El 

0122 

00167 

0 02 

00464 

DLD 

PI X 

012.1 

00170 

0 16 

00406 

MPY 

JX 

0124 

00171 

0 04 

00412 

DST 

J1X 

0125 

00172 

0 02 

00464 

DLD 

Pi X 

0126 

00 1 7 

000201 

IAB 


0127 

00174 

0 16 

00406 

MPY 

JK 

0 1 20 

00175 

0401 

61 

LRS 

15 

0129 

00176 

0 06 

00412 

DAD 

J IX 

0110 

0017? 

0 04 

00412 

DST 

J1 X 

0171 

00200 

0 02 

00406 

DLD 

JX 

0132 

00201 

000201 

IAB 


0137 

00202 

0 16 

00464 

MPY 

P 1 X 

013 4 

00203 

0401 

61 

IRS 

15 

0135 

00204 

0 06 

004 12 

DAD 

J 1 X 

0136 

00205 

0 04 

00412 

DST 

J1 X 

0137 

00206 

0 02 

00 4 10 

DLD 

El 

0138 

00207 

0 07 

00412 

DSB 

J1 X 

0139 

00210 

0411 

77 

LLS 

1 

0140 

00211 

0 04 

00410 

DST 

El 

0141 

00212 

0 02 

00404 

DLD 

E 

014? 

00213 

0 16 

00470 

MPY 

PI Y 

0143 

00214 

0 04 

004 14 

DST 

J 1 Y 

0144 

00215 

0 02 

00404 

DLD 

E 

0145 

00216 

000201 

IAB 


0146 

00217 

0 16 

00470 

MPY 

Pi Y 

0147 

00220 

0401 

61 

IPS 

15 

0 14 9 

00221 

0 06 

00414 

DAD 

,11 Y 

0 1 4 n 

00222 

0 04 

00414 

DST 

J1Y 

0150 

0 022 3 

0 02 

00470 

DLD 

PI Y 

0151 

00224 

000201 

IAB 


0 15? 

00225 

0 16 

00404 

MPY 

E 

0153 

0 02 26 

040 1 

61 

LRS 

15 

0154 

00227 

0 06 

00414 

DAD 

JIT 

015^ 

00230 

0 04 

00414 

DST 

J 1 Y 

0 156 

0023 1 

0 02 

00474 

DLD 

PI 7. 

0157 

00232 

0 16 

00406 

MPY 

JX 

0 158 

00233 

0 04 

00412 

DST 

J1 X 

0159 

00234 

0 02 

00474 

DLD 

P1Z 

0160 

00235 

000201 

IAB 


0161 

00236 

0 16 

00406 

MPY 

JX 

0162 

00237 

04 01 

61 

LRS 

15 

0163 

00240 

0 06 

00412 

DAD 

J1X 

0164 

00241 

0 04 

00412 

DST 

J1 X 

0165 

00242 

0 02 

00406 

DLD 

JX 

0166 

00243 

000201 

TAB 


0167 

00244 

0 16 

00474 

MPY 

P1Z 

0168 

00245 

0401 

61 

LRS 

15 

0169 

00246 

0 06 

00412 

DAD 

J IX 

0170 

00247 

0 04 

00412 

DST 

J1X 

0171 

00250 

0 02 

00414 

DLD 

J1Y 
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MICPOCOMP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0172 

00251 

0 

07 

00412 

D SB 

J1X 

0171 

00252 

0411 

77 

LIS 

1 

017U 

00253 

0 

04 

00414 

DST 

J1 Y 

01 75 

00254 

0 

02 

00464 

DLD 

Pi Y 

0176 

00255 

0 

16 

00404 

MPY . 

E 

0177 

00756 

0 

04 

00412 

DST 

, J1I 

0 1 7R 

00257 

0 

02 

00464 

DLD 

PI X 

017? 

00260 

000201 

IAB 


0180 

00261 

0 

16 

00404 

MPY 

E 

0181 

00262 

0401 

61 

LRS 

15 

0182 

0 026? 

0 

06 

00412 

DAD 

J1 X 

0181 

00264 

0 

04 

00412 

DST 

J1X 

018 4 

00265 

0 

02 

00404 

DLD 

E 

0185 

00266 

000201 

IAB 


0 1 Rf' 

00267 

0 

16 

00464 

MPY 

PI X 

0107 

00270 

0401 

61 

LRS 

15 

0108 

00271 

0 

06 

00412 

DAD 

J1 X 

0187 

00272 

0 

04 

00412 

DST 

J IX 

0 1 °0 

00273 

0 

02 

00460 

DLD 

LI 

01?1 

0027U 

0 

16 

00406 

MPY . 

. JX 

0 1 Q 2 

00275 

0 

06 

00412 

DAD 

J1 X 

019? 

00276 

0 

04 

00412 

DST 

J IX 

0194 

002^7 

0 

02 

00460 

DLD 

LI 

019 c 

00300 

000201 

IAB 


0196 

00301 

0 

16 

00406 

MPY 

JX 

01^7 

00302 

0401 

61 

LRS 

15 

0 1 9 R 

00303 

0 

06 

00412 

DAD 

J1 X 

0199 

00304 

0 

04 

00412 

DST 

J1X 

0200 

00305 

0 

02 

00406 

DLD 

JX 

0201 

00306 

000201 

TAB 


0202 

00307 

0 

16 

004 60 

MPY 

LI 

020? 

00310 

0401 

61 

LRS 

15 

0204 

0 0 3 1 1 

0 

06 

00412 

DAD 

J1X 

0205 

00312 

0411 

77 

LLS 

1 

0206 

00313 

0 

04 

00412 

DST 

J1X 

0207 

00314 

0 

02 

00470 

DLD 

PI Y 

0208 

0 0 315 

0 

16 

004 06 

MPY 

JX 

0209 

0 0316 

0 

04 

00416 

DST 

J1Z 

0210 

00317 

0 

02 

00470 

DLD 

PI Y 

0211 

00 320 

000201 

IAB 


0212 

00 321 

0 

16 

00406 

MPY 

JX 

0213 

00322 

0401 

61 

LRS 

15 

0214 

00323 

0 

06 

00416 

DAD 

JU 

0219 

00324 

0 

04 

00416 

DST 

J1Z 

0216 

00325 

0 

02 

00406 

DLD 

JX 

0217 

00326 

000201 

IAB 


0210 

00327 

0 

16 

00470 

MPY 

PI Y 

021? 

00330 

0401 

61 

LRS 

15 

0220 

00331 

0 

06 

00416 

DAD 

J1 Z 

0221 

00332 

0 

04 

00416 

DST 

J1Z 

0222 

O0333 

0 

02 

00404 

DLD 

E 

0223 

00334 

0 

16 

00474 

MPY 

P1Z 

0224 

00 3 35 

0 

06 

00416 

DAD 

J1Z 

0225 

00336 

0 

04 

00416 

DST 

J1Z 

0226 

00337 

0 

02 

00404 

DLD 

E 

0227 

00340 

000201 

IAB 


0?28 

00341 

0 

16 

00474 

MPY 

P1Z 
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MTCROCOMP TELECOMMUNICATED DATA 


DDP-516 ASSEMBLY LISTING 


0229 

00342 

0401 61 


IRS 

15 

0230 

00343 

0 06 00416 


DAD 

J1Z 

0 231 

00344 

0 04 00416 


D ST 

J1Z 

0232 

00345 

0 02 00474 


DLD 

P1Z 

0233 

00 346 

000201 


IAB 


0234 

00347 

0 16 00404 


MPY 

t 

0235 

00350 

0401 61 


LRS 

15 

0236 

00351 

0 06 00416 


DAD 

J1Z 

0237 

00352 

0411 77 


LLS 

1 

0238 

00353 

0 04 00474 


DST 

P1Z 

0239 

00354 

0 0? 00414 


DLD 

J1Y 

0240 

00355 

0 04 00470 


DST 

Pi Y 

0241 

00356 

0 02 00412 


DLD 

J1X 

0242 

00357 

0 04 00464 


DST 

PI X 

0243 

00360 

0 02 00410 


DLD 

El 

0244 

00361 

0 04 00460 


DST 

LI 

0245 

00362 

000005 


SGL 


0246 

00363 

-0 01 00000 


JHP* 

AZCA 

0247 

00364 

000000 

SVFZ 

DBP 

0 


00365 

000000 




0248 

00 366 

oooooo 

SVFY 

DBP 

0 


00367 

000000 




0249 

00370 

oooooo 

TMPA 

DBP 

0 


00371 

oooooo 




0250 

00372 

oooooo 

TM9B 

DBP 

0 


0037 3 

oooooo 




02M 

00374 

oooooo 

STMP 

DBP 

0 


00 3 7= 

oooooo 




0252 

00376 

oooooo 

SHF1 

DEC 

0 

0253 

00.377 

oooooo 

S HF2 

DEC 

0 

0254 

00400 

020000 

DBT1 

OCT 

20000 


00401 

oooooo 




0255 

00402 

oooooo 

DBIO 

DBP 

0 


00403 

oooooo 




0256 


000460 

LI 

EQO 

•460 

0257 


000464 

P1X 

FQD 

• 464 

0258 


000470 

PI Y 

EQO 

’470 

0259 


000474 

PlZ 

EQO 

♦ 474 

0260 

00404 

oooooo 

E 

DBP 

0 


00405 

oooooo 




0261 

00406 

oooooo 

JX 

DBP 

0 


00407 

oooooo 




0262 

00410 

oooooo 

El 

DBP 

0 


00411 

oooooo 




0263 

00412 

oooooo 

J 1 X 

DBP 

0 


0041.3 

oooooo 




0264 

00414 

oooooo 

J1Y 

DBP 

0 


00415 

oooooo 




0265 

00416 

oooooo 

J1Z 

DBP 

0 


00417 

oooooo 




0266 

00420 

0 oooooo 

SIC 

XAC 

SI 

0267 

00421 

0 oooooo 

S 2C 

X AC 

S 2 

0268 

00422 

0 oooooo 

S3C 

XAC 

S3 

0269 

00423 

0 oooooo 

S4C 

XAC 

S4 

0270 

00424 

041100 


END 
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000077 
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PROGRAM NAME 
SOURCE: LVCA 
BINARY: BLVCA 

ENTRY POINTS (location): LVCA (’13 174) 

GENERAL DESCRIPTION: 

This subroutine performs the leveling function for coarse 
alignment. As input it uses 1 minute’s accumulation of AV pulses in body- 
frame coordinates. As output, it passes on to the executive the body-to~ 
level'frame-quarternibn. This quarterhion is then used as the system 
quarternion prior to the azimuth alignment. 
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Leveling Subroutine 
. For Coarse Alignment 
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NTCROCOWP TEL ECOMNONICATED DATA 
DDP-516 ASSEMBLY LISTING 


onm 




SUBR 

LVCA 

non? 




REL 


ono3 

00000 

0 000000 LVCA 

DAC 

** 

oooa 

00001 

000007 

DBL 


0005 

00002 

0 02 

00454 

DLD 

svz 

0006 

00003 

0 16 

00140 

HPY 

16 OG 

0007 

00004 

0 04 

00134 

DST 

FZ 

OOOfl 

00005 

0 02 

00454 

DLD 

svz 

0000 

00006 

000201 

TAB, 


0010 

00007 

0 16 

00140 

HPY 

I60G 

001 1 

00010 

0401 

61 

LRS 

15 

0012 

00011 

0 06 

00134 

DAD ; 

FZ 

0013 

00012 

0411 

70 

LLS 

8 

oom 

00017 

0 04 

00134 

DST 

FZ 

0015 

00014 

0 02 

00450 

DLD 

SVY 

0016 

00015 

0 16 

00140 

HPY 

16 OG 

0011 

00016 

0 04 

00132 

DST 

FY 

00 1 R 

00017 

0 02 

00450 

DLD 

SVY 

0019 

00020 

000201 

IAB 


0020 

00021 

0 16 

00140 

hpy 

16 OG 

0021 

00022 

0401 

61 

LRS 

15 

0022 

00023 

0 06 

00132 

DAD 

FY 

0023 

00024 

0411 

70 

LLS 

8 

0024 

00026 

0 04 

00132 

DST 

FY 

002 5 

00026 

0 02 

00444 

OLD 

SVX 

0026 

00027 

0 16 

00140 

HPY 

16 OG 

0077 

00030 

0 04 

00130 

DST 

FX 

0029 

00031 

0 02 

00444 

DLD 

SVX 

0 02 9 

00032 

000201 

IAB 


0030 

O0033 

0 16 

00140 

MPY 

16 OG 

0031 

00034 

04'01 

61 

LRS 

15 

0032 

00036 

0 06 

00130 

DAD 

FX 

0033 

00036 

0411 

71 

LLS 

7 

0034 

no 0 3 7 

0 06 

00136 

DAD 

DB PI 

003^ 

00040 

0401 

77 

LRS 

1 

0096 

OOOUI 

0 10 

00000 

CALL 

DSOR 

003"* 

00042 

0 06 

00146 

DAD 

RND 

00 39 

00043 

000005 

SGL 


003 Q 

00044 

0 04 

00460 

STA 

LI 

0040 

00045 

000007 

DBL 


0041 

00046 

0 02 

00134 

DLD 

FZ 

004? 

00047 

0401 

76 

IRS 

2 

0 04 3-. 

00060 

0 17 

00460 

DIV 

LI 

0044 

00051 

0401 

61 

LFS 

15 

0 04 6 

00052 

0411 

61 

LLS 

15 

0046 

00053 

0 04 

00470 

DST 

PI Y 

0047 

00054 

0 02 

00142 

DLD 

DBPO 

0048 

00055 

0 04 

00464 

DST 

PI X 

0049 

00056 

0 07 

00132 

DSB 

FY 

0050 

00057 

0401 

76 

LRS 

2 

0051 

00060 

0 17 

00460 

DIV 

LI 

0052 

00061 

0401 

61 

LFS 

15 

0053 

00062 

0411 

61 

LLS 

15 

0054 

00063 

0 04 

00474 

DST 

P1Z 

0055 

00064 

0 02 

00460 

DLD 

LI 

0056 

00065 

0 16 

00460 

HPY 

LI 

0057 

00066 

0 04 

00144 

DST 

ATHP 
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M T r?CCOMP TFLECOMMONICAT ED DATA 



DDP- 

616 ASSEMBLY 

LISTING 


0053 

00067 

0 02 00470 


DLD 

PI Y 

ro5« 

00070 

0 16 00470 


MPY 

P 1 Y 

0060 

00071 

0 06 00144 


DAP 

AT MP 

0 061 

0007? 

0 04 00144 


PST 

ATMP 

0 062 

00 073 

0 02 00474 


OLD 

Pi Z 

00M 

00074 

0 16 00474 


MPY 

P 1 z 

0064 

00076 

0 06 00144 


PAD 

ATMP 

0066 

00076 

0 04 00144 


DST 

ATMP 

0866 

00077 

0 02 00136 


DLD 

DB PI 

0067 

00100 

0 07 00144 


dsf 

ATMP 

0 06*1 

00 1 C 1 

04H 64 


LLS 

12 

006O 

00102 

0 04 00144 


DST 

ATMP 

0070 

00103 

0 16 00460 


MPY 

1.1 

007 1 

00104 

0401 65 


T.RS 

11 

0072 

00106 

0 06 00460 


DAD 

LI 

0077 

00106 

0 04 00460 


DST 

LI 

007U 

00107 

0 02 00470 


OLD 

PI Y 

0076 

00110 

0 16 00144 


MPY 

ATMP 

0076 

00111 

0401 66 


LRS 

11 

0077 

00112 

0 06 00470 


DAD 

P 1 Y 

0078 

00117 

r> 04 C0470 


DST 

PI Y 

007Q 

00114 

0 02 004^4 


DLD 

P1Z 

0080 

00116 

0 16 00144 


MPY 

ATMP 

008 1 

00116 

0401 66 


LFS 

11 

C08? 

00117 

0 06 00474 


DAD 

PI Z 

0063 

00120 

0 04 00474 


DST 

Pi 7, 

006U 

0012 1 

0 0? 00142 


DID 

DBPO 

0 08 6 

0012? 

0 04 00444 


DST 

SVX 

0 08 6 

0812 7 

0 04 00450 


DST 

SVY 

0087 

00 1 24 

0 04 00454 


DST 

S 7 7. 

0 08 8 

00126 

000005 


SGL 


0038 

0 0126 

-0 01 00000 


JMP* 

L VC A 

oo°o 


000444 

svx 

FQU 

* 444 

0031 


000450 

SVY 

EOH 

* 450 

008? 


000454 

SV7 

FQO 

*464 

0037 

00130 

000000 

FX 

DBP 

0 


00171 

000000 




0034 

0013? 

000000 

FY 

DBP 

0 


00133 

000100 




0096 

00134 

000000 

FZ 

DBP 

0 


00176 

000000 




0086 

00136 

020000 

DBP 1 

OCT 

20000, 0 


00137 

000800 




0087 

00140 

1 34363 

I GOG 

DEC 

-0. 1699995“ 4 R- 

0083 


000460 

T,1 

FQO 

•460 

00 Q 3 


000464 

P IX 

EQTJ 

• 464 

0100 


000470 

PI Y 

EQT! 

♦470 

Old 


000474 

P1Z 

FQO 

* 474 

0102 

0014? 

000000 

DBPO 

DBP 

0 


00143 

000000 




0103 

00144 

000000 

ATMP 

DBP 

0 


00145 

000000 




0104 

00146 

000000 

FND 

OCT 

0,40000 


00147 

040000 





010 C END 
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PROGRAM NAME 
SOURCE: DC50 
BINARY: BDC50 

ENTRY POINT (location): DCOA {'13344) 

ACCESSIBLE VARIABLES (location): AOAP (’13452) 

BOAP (’13454), COAP (’13456), DO AP (’13460), EOAP (’13462), 

FOAP ('13464) 

GENERAL DESCRIPTION: 

The SIRU gyros sense not only a rotational input about their input 
axes, i.e., the A 6 pulses over some interval would equal the integral of 
W over that interval, but also they sense a change in the rotational 

1. Iv ** 

input about their output axes, i.e., the A0 pulses over some interval would 
equal (-I)/H times the integral of W QRA over that interval. The latter 
can essentially be considered an error source since the gyro output is 
supposed to represent only the former input axis rotation. 

The integral of W QRA from ^ to t 2 is simply W QRA (tg) - W QRA 
(t^). TheA0 error during that interval is simply (~l/H) Wq RA (tg) “ ( - I'/H) 
Wq RA To compensate this error, one simply has to add ((I)/H) (Wq rA 

<t 2 » and subtract (I|/H)(W ORA (t 1 )) at time tg. Over one update interval 
the rate W Qra (for say the E gyro) equals 


At 

Since ^ t is constant (.02 seconds), we can express as K ^ and 

rewrite the compensation quantity as 

+<H K> *W - ( H K > • 

This subroutine is called once per update and calculates the first of 
the two compensation terms above. The second term is saved from the 
previous update. DTXB, DTYB and DTZB are A^, A0 y and A<? z 
respectively. 

GAIH, GBIH GFIH are the scaled constants equal to 

<¥ k > 
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HICPOCOYP TELECOMMUNICATED DATA 


DDP-5 1 6 ASSEMBLY LISTING 


onoi 





EEL 


000? 





StIBR 

DCOA 

ono? 





SU BR 

AO RP 

oonu 





SOBR 

BOAP 

ooob 





SOBR 

COAP 

000* 





SOBR 

DOAP 

000" 7 





SO BR 

EOAP 

coco 





SOBR 

FOAP 

000" 

ooooo 

0 

oooooo 

DCOA DAC 

** 

OHIO 

00001 

0 

02 

00414 

LDA 

DTXB 

001 1 

00002 

000007 

DBI 


0012 

00003 

0 

16 

00126 

MPY 

GFIH 

0013 

00004 

0 

04 

00102 

DST 

EO AO 

0014 

00005 

0 

02 

00414 

DLD 

DTXB 

0015 

00005 

0 

16 

00127 

MPY 

GFIH 

0015 

00007 

0 

04 

00104 

DST 

FO A 0 

0017 

OOOIO 

n 

02 

00416 

DLD 

DTYB 

0019 

00011 

0 

16 

00122 

MPY 

GAIH 

0 C19 

00012 

0 

0 4 

00072 

DST 

AO AO 

0020 

00013 

0 

02 

C0416 

DID 

DTYB 

0021 

00014 

n 

16 

00123 

MPY 

GBIH 

002? 

00015 

0 

04 

00074 

DST 

BO AO 

002? 

00015 

0 

0? 

00420 

DLD 

DTZB 

0024 

00017 

n 

16 

00124 

MPY 

GCIH 

0 02 5 

00020 

0 

04 

00076 

DST 

CO AO 

0 "2 6 

00021 

0 

02 

00420 

DLD 

DTZB 

00? 7 

00022 

0 

16 

00125 

MPY 

GDI H 

0 0?3 

00023 

0 

04 

omoo 

DST 

DO AO 

0 02? 

00024 

0 

06 

00406 

DAD 

GDPC 

0030 

00025 

0 

07 

00114 

DSB 

DOAP 

0031 

0 0 020 

0 

04 

00406 

DST 

GDPC 

0 0 32 

00027 

0 

0? 

00072 

DLD 

AO AO 

0 03 3 

00030 

0 

06 

00400 

DAD 

GAPC 

0034 

00031 

0 

07 

00106 

DSB 

AO AP 

0035 

0003? 

0 

04 

00400 

DST 

GAPC 

00 35 

000 3 3 

0 

02 

00074 

DLD 

BO AO 

003 7 

00034 

0 

06 

00402 

DAD 

GBPC 

0033 

00035 

0 

07 

00110 

DSB 

BOAP 

0 0.7 9 

00035 

0 

04 

00402 

DST 

GBPC 

0040 

0003" 

0 

02 

00076 

DLD 

CO AO 

0 04 1 

00040 

0 

06 

00404 

DAD 

GCPC 

0042 

00041 

0 

07 

00112 

DSB 

COAP 

0043 

00042 

0 

04 

00404 

DST 

GCPC 

0 04 4 

o n o 4 3 

0 

02 

00102 

DLD 

EO AO 

0 04 5 

00044 

0 

06 

00410 

DAD 

GEPC 

0 04 5 

00 0 45 

0 

07 

00116 

DSB 

FOAP 

0047 

00045 

0 

04 

00410 

DST 

GEPC 

0043 

00047 

0 

02 

00104 

DLD 

FO AO 

0 04 9 

noo c o 

0 

06 

00412 

DAD 

GFPC 

00^0 

00051 

0 

07 

00120 

DSB 

FOAP 

0 051 

00052 

0 

04 

00412 

DST 

GFPC 

0052 

00053 

0 

02 

00072 

DLD 

AO AO 

0053 

00054 

0 

04 

00106 

DST 

AO AP 

0054 

00055 

0 

02 

00074 

DLD 

BO AO 

0055 

00056 

0 

04 

00110 

DST 

BOAP 

0055 

oon57 

0 

02 

00076 

DLD 

CO AO 

0057 

00060 

0 

04 

00112 

DST 

COAP 
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HTCROCONP TELECOM HO NIC AT ED DATA 



DDP- 

616 ASSEMBLY 

LIST 

ING 


D05R 

00061 

0 02 00100 


DID 

DOAO 

0069 

00062 

0 04 00114 


DST 

DOAP 

0060 

00063 

0 02 00102 


DLD 

EOAO 

0 061 

00064 

0 04 00116 


DST 

EOAP 

0062 

00065 

0 02 00104 


DLD 

EOAO 

0 06 3 

00066 

0 04 00120 


DST 

FOAP 

0064 

00067 

000005 


SGL 


0066 

00070 

-0 01 00000 


J HP* 

DCO A 

0066 

00072 

000000 

AOAO 

DBP 

0 


00073 

000000 




0067 

00074 

000000 

BOAO 

DBP 

0 


00076 

000000 




006? 

00076 

000000 

CO AO 

DBP 

0 


00077 

000000 




CC6Q 

00100 

000000 

DOAO 

DBP 

0 


00101 

000000 




0070 

00102 

000000 

EOAO 

DBP 

0 


00103 

oooooo 




0071 

00104 

onoooo 

FOAO 

DBP 

0 


00106 

oooooo 




0072 

00106 

oooooo 

AOAP 

DBP 

0 


00107 

oooooo 




0 073 

00110 

oooooo 

30AP 

DBP 

0 


00111 

oooooo 




0074 

00112 

oooooo 

COAP 

DBP 

0 


0011 3 

oooooo 




0075 

00114 

oooooo 

DOAP 

DBP 

0 


00116 

oooooo 




0076 

00116 

oooooo 

EOAP 

DBP 

0 


00117 

oooooo 




OQ77 

00120 

oooooo 

POAP 

DBP 

0 


00121 

oooooo 




007? 

00122 

002667 

GAIH 

OCT 

2567 

0070 

00123 

175211 

GBIH 

OCT 

175211 

OORO 

00124 

002567 

GCIH 

OCT 

2567 

0 OR 1 

00126 

175211 

GDIH 

OCT 

175211 

0082 

00126 

002567 

GEIH 

OCT 

2567 

0 083 

00127 

175211 

GFIH 

OCT 

175211 

0084 


000400 

GAPC 

EQU 

•400 

0085 


000402 

GBPC 

EQU 

GAPC+2 

0086 


000404 

GCPC 

EQU 

GAPC+4 

0087 


000406 

GDPC 

EQU 

GAPC+6 

0083 


000410 

GEPC 

EQU 

GAPC+8 

OOP? 


000412 

GPPC 

EQU 

GAPC+10 

0090 


000414 

DTXB 

EQU 

'414 

0091 


000416 

DTYB 

EQU 

DTXB+2 

0092 


000420 

DTZB 

EQU 

DTXB+4 

0093 




END 
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PROGRAM NAME: 

SOURCE: PDIS 
BINARY: BPSFI 

ENTRY POINTS (LOCATION): PSFI ('14000), PRBI (44740) 

GENERAL DESCRIPTION: 

The subroutine PSFI is called once every two minutes and its 
purpose is to estimate bias recompensations for failed accelerometers. 
Whenever the accelerometer fail status changes, this subroutine will jump 
to RSTC which restarts the compensation estimator by zeroing INIT and 
storing the new fail status in PSFC (except when a change is made such 
that there are no fails, in other words a fail has healed, in which case 
PSFI just returns). The first time one accelerometer fail is detected and 
isolated PSFI will jump to RSTC. The next iteration, 2 minutes later, 
provided that the fail status is the same, PSFI will jump to COCR to do the 
first of five iterations (10 minutes of AV) used to estimate the bias. If 
a second fail occurs during the 10 minutes the whole process is restarted. 

For one fail, five bias estimates are calculated and stored 
sequentially in Ell, Ell + 2, Ell + 4, Ell + 6 and Ell + 8. After 
the fifth iteration these are summed by SUMC, scaled by BIAM and 
stored in OPFB. Then a call is made to RORB which takes a statistical 
differential of the five bias estimates which is then compared to LIMR to 
classify the degradation as either a bias or a ramp, indicating such by 
putting a plus or minus 1 in FROB. The bias estimate is then added to 
ABIA, BBLA ... or FBlA which eventually recompensates the accelerometers 
Finally the bias estimate is scaled for the output program and stored in FPBO. 

For two failures, the sequence starts at TW r FL and requires more man 
ipulation because it is not desirable to have one failed accelerometer effect 
the bias estimate of another. It also requires a scaling of 5/4 because of the 
difference in the two fail error equations. 
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The subroutine PRBI is called once every accelerometer update 
and if sense switch 1 is reset will add the recompensation estimates 
made by PSFI ( AB1A . . . FBIA ) to the raw accelerometer pulse counts. 
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"TCROCOMP TELECOHH'TNICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0001 




ABS 


0002 




ORG 

•14000 

0003 




SUBR 

PS FI 

0004 




SOB 11 

PBBI 

000 5 

14000 

0 000000 

PSFI 

DAC 

** 

0006 

14001 

000007 


DBL 


0007 

14002 

0 02 14052 


DLD 

PSFS 

0008 

14003 

0 04 14054 


D ST 

PSSP 

0009 

14004 

0 02 00320 


DLD 

PFST 

0010 

14005 

0 04 14052 


DST 

PSFS 

0011 

14006 

000201 


IAB 


0012 

14007 

100040 


SEE 


0013 

14010 

0 01 14025 


J HP 

TROB 

0014 

14011 

000201 


IAB 


0015 

14012 

000005 


SGI 


0016 

14013 

101040 


SNZ 


0017 

14014 

-0 01 14000 


J HP* 

PS FI 

0018 

14015 

000007 


DBL 


0019 

14016 

0 07 14054 


DSB 

PSSP 

0020 

14017 

100040 


SZE 


0021 

14020 

0 01 14044 


J HP 

PSTC 

0022 

14021 

000201 


IAB 


0023 

14022 

100040 


SZE 


0024 

1 4023 

0 01 14044 


JHP 

RSTC 

002 5 

14024 

0 01 14102 


JHP 

COCR 

0026 

14025 

000201 

TP OB 

IAB 


0027 

1 4026 

0 07 14054 


DSB 

PSSP 

002° 

1 4027 

100040 


SZE 


0029 

14030 

0 01 14034 


JHP 

SPCC 

0030 

14031 

000201 


IAB 


00 31 

14 0 32 

101040 


SJTZ 


00 32 

14033 

0 01 14102 


JHP 

COCR 

0033 

14034 

0 02 14052 

SPCC 

DLD 

PSFS 

0034 

14035 

000201 


IAB 


0035 

14036 

0 07 14054 


DSB 

PSSP 

0036 

14037 

100040 


SZE 


0037 

14 040 

0 01 14044 


JHP 

RSTC 

003R 

14041 

000201 


TAB 


0 03 9 

14042 

101040 


SNZ 


0040 

14043 

0 01 14102 


JHP 

COCR 

0041 

14044 

0 02 14052 

RSTC 

DLD 

PSFS 

0042 

14045 

0 04 14056 


DST 

PSFC 

0043 

14046 

000005 


SGL 


0044 

14047 

140040 


CRA 


0045 

1 4050 

0 04 14100 


STA 

IN IT 

0046 

14051 

-0 01 14000 


JHP* 

PSFI 

0047 


000744 

PACA 

EQO 

*744 

0048 


000746 

PBCA 

EQO 

PACA+2 

0049 


000750 

PCCA 

EQO 

PACA + 4 

0050 


000752 

PDCA 

EQO 

PACA+6 

0051 


000754 

PECA 

EQO 

PACA+8 

0052 


000756 

PFCA 

EQO 

PACAMO 

0053 


000320 

PEST 

EQO 

• 320 

0054 

14052 

oooooo 

PSFS 

DBP 

0 


14053 

000000 




0055 

14054 

oooooo 

PSSP 

DBP 

0 


14055 

oooooo 
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MTCPCCOMP TELECOMMUNICAT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


005* 

14056 

000000 

FSFC 

DBP 

0 


14057 

000000 




0057 

14060 

000000 

OPFB 

DBP 

0 


14061 

000000 




0058 

14062 

000000 

OPS B 

DBP 

0 


14063 

000000 




0059 


000436 

FFBO 

EQtJ 

*436 

0060 


000440 

SPBO 

FQTT 

*440 

0061 

1 4064 

000000 

LIMR 

OCT 

0, 10000 


14065 

010000 




0062 

1 4066 

000000 

D 

DBP 

0 


1 4067 

000000 




0063 

1 4070 

000000 

Dl 

DBP 

0 


1 4071 

000000 




0064 

14072 

000000 

D2 

DBP 

0 


1 4073 

000000 




0065 


000442 

FFOB 

EQO 

*442 

0066 


000443 

SBOB 

EQD 

•443 

0067 

14074 

oooooo 

SAVM 

DBP 

0 


1 4075 

000000 




0068 

14076 

oooooo 

DBPO 

DBP 

0 


14077 

ooooco 




0069 

14100 

oooooo 

IKIT 

OCT 

0 

0070 

14101 

000144 

OPMC 

DEC 

100B15 

0071 

14102 

0 02 00744 

COCR 

DLD 

PACA 

0072 

14103 

0 04 14620 


D ST 

HA 

0073 

14104 

C 02 00746 


DLD 

PBCA 

007ti 

14106 

0 04 14622 


DST 

MB 

0075 

1410 6 

C 02 00750 


DLD 

PCCA 

0076 

14 107 

0 04 14624 


DST 

HC 

007^ 

14110 

0 02 00752 


DLD 

PDC A 

0078 

14111 

0 04 14626 


DST 

HD 

007Q 

14112 

0 02 00754 


DLD 

PECA 

0080 

14113 

0 04 14630 


DST 

ME 

or 8 1 

14114 

0 02 00756 


DLD 

PFCA 

0082 

14115 

0 04 14632 


DST 

MF 

0 0 8 3 

14 116 

0 00005 


SGI 


0 084 

14117 

0 02 14100 


IDA 

INIT 

0 085 

14120 

141206 


AOA 


0086 

14121 

0 04 14100 


STA 

INTT 

0087 

14122 

0415 77 


AtS 

1 

0068 

14123 

0 04 00000 


STA 

0 

0088 

14124 

0 02 14057 


LDA 

FS FC+1 

0080 

14125 

100040 


SEE 


0091 

14126 

0 01 14235 


JMP 

TWFL 

0092 

14127 

0 02 14056 


LDA 

FSFC 

0093 

14130 

0415 76 


ALS 

2 

0094 

14131 

0 06 14204 


ADD 

FFAD 

0095 

14132 

0 04 14203 


STA 

FAPT 

0096 

14133 

000007 


DB1 


0097 

14134 

-0 10 14203 


JST* 

FAPT 

0098 

14135 

1 04 14646 


DST 

Ell-2,1 

0099 

14136 

000005 


SGL 


0100 

14137 

0 02 14100 


LDA 

INIT 

0101 

14140 

0 07 14774 


SUB 

-5 

0102 

14141 

100040 


SEE 


0103 

14142 

-0 01 14000 


JMP* 

PS FI 
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MTCPOCOMP TELECOMMUNICATED DATA 
DDP-51 6 ASSEMBLY LISTING 


niou 

14143 

0 

04 14100 


STA 

INIT 

0105 

14144 

0 

35 14773 


LDX 

= 0 

0105 

14145 

000007 


DBL 


0107 

14146 

0 

10 14475 


JST 

SUMC 

0108 

14147 

0 

10 14504 


J ST 

BIAN 

010° 

14150 

0 

04 14060 


DST 

OP FB 

OHO 

14151 

0 

10 14431 


JST 

ROFB 

01 1 1 

14152 

0 

04 14070 


DST 

Dl 

0112 

14153 

1 0 1 400 


SMI 


om 

14154 

0 

01 14157 


JMP 

*43 

0114 

14155 

0 

07 14070 


DSB 

Dl 

Oil 5 

14156 

0 

07 14070 


DSB 

Dl 

0116 

14157 

0 

07 14064 


DSB 

LI MR 

0117 

14160 

000005 


SGL 


011° 

14161 

1 00400 


SPI 


01 19 

14162 

0 

01 14165 


JMP 

* 4-3 

0120 

14163 

0 

02 14772 


I, DA 

=-1 

0121 

14164 

iooooo 


SKP 


0122 

14165 

0 

02 14771 


IDA 

=1 

0123 

14166 

0 

04 00442 


STA 

FFOB 

0124 

14167 

0 

02 14056 


IDA 

FSFC 

0125 

14170 

0415 77 


ALS 

1 

0 126 

14171 

0 

04 00000 


STA 

0 

0 1 2 ’ 7 

14172 

000007 


DBL 


012* 

14 173 

0 

02 14060 


DLD 

0PF3 

012* 

14174 

1 

06 14722 


DAD 

ABIA-2, 1 

0130 

14175 

1 

04 14722 


DST 

ABIA-2 ,1 

0131 

14176 

0411 67 


LLS 

9 

0132 

14177 

0 

16 14101 


MPY 

OP MC 

0133 

1 U200 

0 

04 00436 


DST 

FPBO 

0 13a 

14201 

000005 


SGL 


0135 

1 4202 

-0 

01 14000 


JMP* 

PS FI 

0136 

1420 3 

ooooco 

F APT 

OCT 

0 

0137 

1 42 04 

0 

01420 1 

FF AD 

DAC 

*- 3 

0138 

1 4205 

0 

000000 

AFAL 

DAC 

*4 

0170 

1 4206 

0 

10 14530 


JST 

CACA 

0140 

14207 

0 

07 14620 


DSB 

MA 

0141 

14210 

-0 

01 14205 


JMP* 

AFAL 

0 14? 

14211 

0 

oooooo 

0FAL 

DAC 

** 

0143 

14212 

0 

10 14541 


JST 

CACB 

0 1 44 

14213 

0 

07 14622 


DSB 

MB 

0 1 46 

1 4214 

-0 

01 14211 


JMP* 

BFAL 

0 14 6) 

14215 

0 

oooooo 

CFAL 

DAC 

** 

0147 

14216 

0 

10 14552 


JST 

C ACC 

0 145 

14217 

0 

07 14624 


DSB 

MC 

0149 

1 4220 

-0 

01 14215 


JMP* 

CFAL 

0150 

14221 

0 

OOOOOO 

DFAL 

DAC 

♦ * 

0151 

14222 

0 

10 14563 


JST 

CACD 

015? 

14223 

0 

07 14626 


DSB 

MD 

0153 

1 4224 

-0 

01 14221 


JMP* 

' DFAL 

a i*S4 

14225 

0 

OOOOOO 

EFAL 

DAC 

** 

0155 

1 47 26 

0 

10 14574 


JST 

CACE 

0166 

14227 

0 

07 14630 


DSB 

ME 

0157 

14230 

-0 

01 14225 


JMP* 

EFAL 

0 158 

1423 1 

0 

OOOOOO 

FFAL 

, DAC 

4 * 

0157 

14232 

0 

10 10605 


JST 

CACF 

0160 

1 42 33 

0 

07 14632 


DSB 

M7 
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MTCROCOMP TELECOM HUN ICATED DATA 


BDP-516 ASSEMBLY LISTING 


0161 

14234 

-0 01 

14231 

JMP* 

PPAL 

0162 

14235 

0415 

76 TVFL 

ALS 

2 

016 3 

14236 

0 06 

14204 

ADD 

FPAD 

0164 

14237 

0 04 

142 03 

STA 

PAPT 

0165 

14240 

0 02 

14056 

LDA 

PS PC 

0166 

14241 

0415 

77 

ALS 

1 

0167 

14242 

0 06 

14617 

ADD 

MADE 

016 8 

14243 

0 04 

14616 

STA 

MPTR 

0169 

14244 

000007 

DBL 


0170 

14245 

-0 02 

14616 

DLD* 

MPTR 

0171 

14246 

0 04 

14074 

DST 

SAVM 

017? 

14247 

000005 

SGL 


0173 

14250 

0 02 

14056 

LDA 

PS PC 

01^4 

14251 

0415 

76 

ALS 

3 

017 5 

14252 

0 06 

14056 

ADD 

FS FC 

0176 

14253 

0 06 

14527 

ADD 

DACA 

0177 

14254 

0 04 

14526 

STA 

CAPT 

0 17 B 

1 4255 

000007 

DBL 


0179 

14256 

-0 10 

14526 

J ST* 

CAPT 

01^0 

14257 

-0 04 

14616 

DST* 

MPTR 

01 B 1 

14260 

-0 10 

14203 

JST* 

FAPT 

0102 

14261 

1 04 

14660 

DST 

E21-2 f 1 

0183 

14262 

0 02 

14074 

DLD 

SAVM 

0189 

14263 

-0 04 

14616 

DST* 

MPTR 

0186 

14264 

000005 

SGL 


0186 

14265 

0 02 

14056 

LDA 

FSFC 

0187 

14266 

0415 

76 

ALS 

2 

0 18 8 

14267 

0 06 

14204 

ADD 

FFAD 

0189 

14270 

0 04 

14203 

STA 

FAPT 

0190 

14271 

0 02 

14057 

LDA 

FSFC+1 

01 Q 1 

14272 

0415 

77 

ALS 

1 

019 7 

14273 

0 06 

14617 

ADD 

MADR 

0193 

14274 

0 04 

14616 

STA 

MPTR 

0194 

14275 

000007 

DBL 


0195 

14276 

-0 02 

146 16 

DLD* 

MPTR 

0 19 6 

14277 

0 04 

14074 

DST 

SAVM 

01 9' T 

14300 

000005 

SGL 


0198 

14301 

0 02 

14057 

LDA 

FSFC+1 

0190 

14302 

0415 

75 

ALS 

3 

0200 

14 303 

0 06 

14057 

ADD 

FSFC+1 

0201 

14304 

0 06 

14527 

ADD 

DACA 

0202 

14305 

0 04 

14526 

STA 

CAPT 

0203 

14306 

000007 

DBL 


0204 

14307 

-0 10 

14526 

JST* 

CAPT 

0205 

14310 

-0 04 

14616 

DST* 

MPTR 

0208 

14311 

-0 10 

14203 

JST* 

FAPT 

0207 

14312 

1 04 

14646 

DST 

El 1-2, 1 

0208 

14313 

0 02 

14074 

DLD 

SAVM 

0209 

14314 

-0 04 

14616 

DST* 

MPTR 

0210 

14315 

000005 

SGL 


0211 

14316 

0 02 

14100 

LDA 

IHIT 

0212 

14317 

0 07 

14774 

SOB 

=5 

0213 

14320 

100040 

SZE 


0214 

1 4 321 

-0 01 

14000 

JMP* 

PSPI 

0215 

14322 

0 04 

14100 

STA 

III IT 

0216 

14323 

0 35 

14773 

LDX 

-0 

02 1 7 

14324 

000007 

DBL 
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MIC70C0MP TELECOM HU NIC AT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0218 

14325 

0 10 

14475 

JST 

S0HC 

0219 

1 4326 

0 04 

14060 

DST 

OPFB 

0220 

14327 

0401 

76 

IRS 

2 

0221 

14330 

0 06 

14060 

DAD 

OPFB 

0222 

14331 

0 10 

14504 

JST 

BIAH 

0223 

14332 

0 04 

14060 

DST 

OPFB 

0224 

14333 

0 10 

14431 

JST 

RORB 

0228 

14334 

0 04 

14070 

DST 

D1 

02 28 

14335 

0401 

76 

IRS 

2 

0221 

14336 

0 06 

14070 

DAD 

Dl 

0229 

14337 

0 04 

14070 

DST 

Dl 

0229 

14340 

101400 

SHI 


0230 

14341 

0 01 

14344 

JHP 

*+ 3 

0231 

14742 

0 07 

14070 

DSB 

Dl 

0232 

14343 

0 07 

14070 

DSB 

Dl 

023? 

14344 

0 07 

14064 

DSB 

LIMR 

0234 

14145 

000005 

SGI 


0235 

14346 

•1004 00 

SPL 


02 38 

14347 

0 01 

14 352 

JHP 

*♦ 3 

02 3 7 

14350 

0 02 

14772 

LDA 

= - 1 

0238 

14351 

100000 

SKP 


0239 

14352 

0 02 

14771 

LDA 

= 1 

0240 

14353 

0 04 

00442 

STA 

FROB 

0241 

14354 

0 02 

14056 

LDA 

FS PC 

0242 

14355 

0415 

77 

ALS 

1 

02 43 

143 56 

0 04 

00000 

STA 

0 

0244 

14357 

000007 

DBL 


0245 

1436 0 

0 02 

14060 

DLD 

OPFB 

0246 

14361 

1 06 

14722 

DAD 

abia-; 

0247 

14362 

1 04 

14722 

DST 

ABIA- 

0248 

14 363 

0411 

67 

LLS 

9 

0249 

14 364 

0 16 

14101 

MPY 

OP HC 

0250 

14365 

0 04 

00436 

DST 

FPBO 

0251 

1« 366 

0 35 

14770 

LDX 

*10 

0252 

14 367 

0 10 

14475 

JST 

StJHC 

0253 

14370 

0 04 

14062 

DST 

OPSB 

0254 

14 371 

0401 

76 

LRS 

2 

0255 

14372 

0 06 

14062 

DAD 

OPSB 

0256 

14373 

0 10 

14504 

JST 

BIAH 

0257 

14374 

0 04 

14062 

DST 

OPSB 

0258 

14 375 

0 10 

14431 

JST 

RORB 

0259 

14376 

0 04 

14072 

DST 

D2 

0260 

14377 

0401 

76 

LRS 

2 

0261 

14400 

0 06 

14072 

DAD 

D2 

0262 

14401 

101400 

SHI 


0263 

14402 

0 01 

14405 

JHP 

*♦3 

0264 

14403 

0 07 

14072 

DSB 

D2 

0265 

14404 

0 07 

14072 

DSB 

D2 

0266 

1 4405 

0 07 

14064 

DSB 

LI HR 

0267 

14406 

000005 

SGI 


0269 

14407 

100400 

SPL 


026° 

14410 

0 01 

14413 

JHP 

*♦3 

0270 

14411 

0 02 

14772 

LDA 

=-1 

0271 

14412 

100000 

SKP 


0272 

14413 

0 02 

14771 

LDA 

= 1 

0273 

14414 

0 04 

00443 

STA 

SROB 

0274 

14415 

0 02 

14057 

LDA 

FSFC+ 
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*TC^ncP<"P TELECOHEUNICATED DATA 



DDP- 

■516 AS 

SEHBLY 

LISTING 


0275 

14416 

0415 

77 


ALS 

1 

02^ 

14417 

0 04 

00000 


ST A 

0 

0277 

1 4420 

000007 


DBL 


02^0 

14421 

0 02 

14062 


DLD 

OPSB 

027° 

14422 

1 06 

14722 


DAD 

ABIA-2 ,1 

0?R0 

14423 

1 04 

14722 


DST 

ABIA-2, 1 

02 01 

14424 

0411 

67 


LIS 

9 

0202 

14425 

0 16 

14101 


HPY 

OPHC 

028 1 

1 4426 

0 04 

00440 


DST 

SPBO 

0284 

14427 

000005 


SGL 


0280 

14430 

-0 01 

14000 


JHP* 

PSFI 

028* 

14431 

0 000000 

RORB 

DAC 

* * 

0287 

1 4432 

1 02 

14650 


DLD 

Ell ,1 

0288 

14 4 3 3 

0401 

76 


LRS 

2 

02«9 

1 4434 

1 06 

14650 


DAD 

Ell, 1 

02 °0 

14435 

0401 

77 


IPS 

1 

0 29 1 

14436 

1 06 

14650 


DAD 

Ell ,1 

02 9? 

14437 

0 04 

14066 


PST 

D 

0291 

14440 

0 02 

14076 


DLD 

DBPO 

079U 

1 4 U 4 1 

1 07 

14652 


DSB 

El 1 + 2, 1 

029* 

14442 

0401 

74 


LRS 

4 

029* 

144 4 3 

1 06 

14652 


DAD 

El 1 + 2, 1 

0?9' T 

1 4444 

0401 

77 


LRS 

1 

0799 

1 4445 

0 06 

14066 


DAD 

D 

02 9 ° 

14446 

0 04 

14066 


DST 

D 

0100 

14447 

0 02 

14076 


DLD 

DBPO 

0?01 

14450 

1 07 

14654 


DSB 

El 1+4,1 

030? 

14451 

0401 

76 


LBS 

2 

0303 

14452 

1 07 

14654 


DSB 

El 1 + 4 , 1 

0304 

14453 

0401 

76 


LBS 

2 

0708 

14454 

0 06 

14066 


DAD 

D 

03 08 

14455 

0 04 

14066 


DST 

D 

0107 

14456 

0 02 

14076 


DLD 

DBPO 

03 09 

14457 

1 07 

14656 


DSB 

E11+6, 1 

0 100 

14460 

0401 

76 


LRS 

2 

0310 

14461 

1 07 

14656 


DSB 

El 1 + 6, 1 

0111 

1 /1 nc o 

(\u r\ + 

7 7 




VJ "♦ \* • 

r / 


Li « D 

1 

0 312 

1 446 3 

0 06 

14066 


DAD 

D 

0313 

14464 

0 04 

14066 


DST 

D 

0314 

14465 

1 02 

14660 


DLD 

El 1 + 8, 1 

03 15 

1 4466 

0401 

77 


LBS 

1 

0316 

1 4467 

1 06 

14660 


DAD 

El 1 + 8, 1 

0317 

14470 

0401 

74 


LRS 

4 

0318 

14471 

1 07 

14660 


DSB 

El 1 + 9, 1 

031° 

14472 

0 06 

14066 


DAD 

D 

0320 

14473 

0 04 

14066 


DST 

D 

0 32 1 

14474 

-0 01 

14431 


JHP* 

RORB 

0322 

14475 

0 000000 

SUHC 

DAC 

** 

0 32 3 

14476 

1 02 

14650 


DLD 

Ell ,1 

0324 

14477 

1 06 

14652 


DAD 

E11 + 2, 1 

0925 

14500 

1 06 

14654 


DAD 

El 1 ♦ 4 , 1 

0326 

14501 

1 06 

14656 


DAD 

El 1 + 6, 1 

0327 

14502 

1 06 

14660 


DAD 

El 1 + 8 , 1 

0128 

14503 

-0 01 

14475 


JHP* 

SO HC 

032° 

14504 

0 000000 

BIAH 

DAC 

*• 

03 30 

14505 

0 04 

14714 


DST 

TEH 1 

0331 

14506 

0 16 

14525 


HPY 

BI HC+ 1 
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MICROCOMP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0332 

14507 

0401 

77 


LRS 

1 

0333 

14510 

0 

04 

14716 


D ST 

TEM2 

033a 

14511 

0 

02 

14524 


DLD 

BIMC 

0 3 35 

14512 

0 

16 

14715 


NPY 

TEM1+1 

0336 

14513 

0401 

77 


LRS 

1 

0337 

14514 

0 

06 

14716 


DAD 

TEH2 

03 3 3 

14515 

0401 

63 


LRS 

13 

0339 

14516 

0 

04 

14716 


DST 

TE M2 

03 40 

14517 

0 

02 

14714 


DLD 

TEM1 

0341 

14520 

0 

16 

14524 


MPY 

BIMC 

03 42 

14521 

0411 

77 


LLS 

1 

n 343 

14522 

0 

06 

14716 


DAD 

TE M2 

0 3 44 

14523 

-0 

01 

14504 


JWP* 

BIAM 

0 345 

14524 

042747 

BIMC 

DBP 

0. 333 33333 33E-4 BB- 14 


14525 

054471 




0 346 





* SB MC DEC 

0.33333333 33 E-3 BB-1 1 

0 34 1 

14526 

000000 

CAPT 

OCT 

0 

034P 

14527 

0 

014517 

DACA 

DAC 

*- 8 

034° 

14630 

0 

000000 

CACA 

DAC 

** 

0 3 50 

14531 

0 

02 

14622 


DLD 

MB 

0351 

14532 

0 

07 

14624 


DSB 

MC 

0 3 C '2 

14533 

0 

07 

14626 


DSB 

MD 

0353 

14534 

0 

06 

14630 


DAD 

ME 

0354 

14535 

0 

06 

14632 


DAD 

MF 

0355 

14536 

0 

10 

14674 


JST 

MSPT 

0355 

14637 

0 

04 

14634 


DST 

CA 

0357 

14640 

-0 

01 

14530 


JMP* 

CACA 

0358 

14541 

0 

000000 

CACB 

DAC 

** 

0359 

14542 

0 

02 

14620 


DLD 

MA 

0 360 

14543 

0 

06 

14624 


DAD 

MC 

03 61 

14544 

0 

06 

14626 


DAD 

MD 

0 362 

14545 

0 

06 

14630 


DAD 

MF 

0363 

14546 

0 

06 

14632 


DAD 

HF 

0364 

14547 

0 

10 

14674 


JST 

MSPT 

0365 

14550 

0 

04 

14636 


DST 

CB 

0366 

14551 

-0 

01 

14541 


JMP* 

CACB 

n?67 

1 4552 

0 

000000 

C ACC 

DAC 

** 

0 360 

14553 

0 

02 

14622 


DLD 

MB 

036 4 

14554 

0 

07 

14620 


DSB 

MA 

0370 

14555 

0 

06 

14626 


DAD 

MD 

0371 

14556 

0 

07 

14630 


DSB 

ME 

0 37 2 

14557 

0 

06 

14632 


DAD 

MF 

0373 

14560 

0 

10 

14674 


JST 

MSPT 

0 1 7 4 

14561 

0 

04 

14640 


DST 

CC 

0 375 

14562 

-0 

01 

14552 


JMP* 

C ACC 

0 ^76 

14563 

0 

000000 

CACD 

DAC 

** 

0377 

14564 

0 

02 

14622 


DLD 

MB 

0378 

1 4565 

0 

07 

14620 


DSB 

MA 

0379 

14566 

0 

06 

14624 


DAD 

MC 

0380 

14567 

0 

06 

14630 


DAD 

ME 

0381 

14570 

0 

07 

14632 


DSB 

MP 

0382 

14571 

0 

10 

14674 


JST 

MSPT 

0383 

14572 

0 

04 

14642 


DST 

CD 

03R4 

14573 

“0 

01 

14563 


JHP* 

CACD 

03 8 5 

14574 

0 

000000 

CACE 

DAC 

** 

0386 

14575 

0 

02 

14620 


DLD 

MA 

0387 

14576 

0 

06 

14622 


DAD 

MB 
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FT C 9 CCO" P TELECOM MU NICAT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING ( 


0 393 

14677 

0 07 14624 


DSB 

HC 

0339 

14600 

0 06 14626 


DAD 

HD 

0300 

14601 

0 07 14632 


DSB 

HP 

0391 

14602 

0 10 14674 


JST 

MS PT 

0392 

1 4607 

0 04 14644 


DST 

CE 

0393 

14604 

-0 01 14574 


J HP* 

CACE 

0 39 4 

1 4606 

0 000000 

CACF 

DAC 

** 

039 5 

14606 

0 02 14620 


DLD 

HA 

0 396 

1 4607 

0 06 14622 


DAD 

MB 

0307 

14610 

0 06 14624 


DAD 

HC 

0 399 

14611 

0 07 14626 


DSB 

HD 

03 0 9 

14612 

0 07 1 46.30 


DSB 

HE 

0 40 0 

14613 

0 10 14674 


JST 

MSPT 

0401 

14614 

0 04 14646 


DST 

CF 

0 40 2 

1 4616 

-0 01 14605 


JHP* 

CACF 

0403 

14616 

000000 

MPTR 

OCT 

0 

0404 

14617 

0 014616 

M ADR 

DAC 

*-1 

0409 

14620 

000000 

HA 

DBP 

0 


1 4621 

000000 




0 UQ6 

14622 

000000 

ms 

DBF 

. 0 


14623 

000000 




0407 

14624 

000000 

HC 

DBP 

0 


14626 

000000 




040« 

1 46 26 

000000 

HD 

DBP 

0 


14627 

000000 




040 Q 

14630 

000000 

HE 

DBP 

0 ' 


14631 

000000 




0410 

1 4632 

000000 

HF 

DBP 

0 


14633 

000000 




0411 

14634 

000000 

CA 

DBP 

0 


14635 

000000 




0 412 

14636 

000000 

CB 

DBP 

0 


14637 

000000 




0413 

1 4640 

000000 

cc 

DBP 

0 


1464 1 

000000 




041 a 

1 464 2 

000000 

CE 

DBP 

0 


1464 3 

0 00000 




041 6 

14644 

000000 

CE 

DBP 

0 


14645 

000000 




0419 

1 4646 

000000 

CF 

DBP 

0 


1 4647 

000000 




0 4 1 7 

14650 

000000 

Ell 

DBP 

0 


14651 

000000 




041 0 

1 4662 

000000 


BSZ 

8 


14653 

000000 





14654 

000000 





14656 

000000 





14656 

000000 





1 4657 

000000 





1 4 6 6 0 

000000 





14661 

000000 




0419 

14662 

000000 

E21 

DBP 

0 


14663 

000000 




0420 

14664 

000000 


BSZ 

8 


14665 

000000 





14666 

000000 





14667 

000000 
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NTCP OCONP TELFCONNONICATED DATA 



DD? 

-516 ASSEMBLY 

LISTING 



14670 

000000 





14671 

000000 





1467? 

oooooo 





14673 

000000 




0421 

14674 

0 oooooo 

HSPT 

DAC 

*♦ 

0422 

14675 

0 04 14714 


DST 

TEN 1 

0423 

14676 

0 16 14721 


HPY 

RPTTO 

0424 

14677 

0401 77 


LRS 

1 

0425 

14700 

0 04 14716 


DST 

TEN2 

0426 

14701 

0 02 14720 


DID 

RPTT 

0427 

14702 

0 16 14715 


NPY 

TEH1+1 

042° 

14703 

0401 77 


LRS 

1 

0429 

14704 

0 06 14716 


DAD 

TEN2 

0430 

14705 

0 06 14722 


DAD 

ROND 

0431 

14706 

0401 62 


LRS 

14 

0 432 

14707 

0 04 14716 


DST 

TEN2 

0433 

14710 

0 02 14714 


DID 

TER1 

04 34 

14711 

0 16 14720 


MPT 

RPTT 

04 35 

14717 

0 06 14716 


DAD 

TEN2 

04 36 

14713 

-0 01 14674 


JNP* 

MSPT 

0 43 7 

14714 

OOOOOO 

TENl 

DBP 

0 


14^16 

OOOOOO 




0430 

14 716 

oooooo 

TEM2 

DBP 

0 


14717 

000900 




0439 

14720 

034476 

RPTT 

OCT 

34476,22706 


14721 

022706 




0440 

14722 

OOOOOO 

ROND 

OCT 

0,20000 


14723 

020000 




0441 

14724 

OOOOOO 

ASIA 

DBP 

0 


14725 

oooooo 




0447 

14726 

oooooo 

BRTA 

DBP 

0 


14727 

oooooo 




04 4 3 

14730 

oooooo 

CBIA 

DBP 

0 


1 4 73 1 

oooooo 




0444 

14732 

oooooo 

DBIA 

DBP 

0 


14 733 

oooooo 




0 446 

147.34 

oooooo 

E 81 A 

DBP 

0 


1 4735 

oooooo 




0 446 

14736 

oooooo 

F B I A 

DBP 

0 


14737 

oooooo 




0447 


000600 

PAPC 

ECHJ 

•600 

04 4 R 


000602 

PBPC 

EQ(T 

PAPC+2 

0449 


000604 

PCPC 

FQO 

PAPC+4 

0450 


000606 

PDPC 

EQIT 

PAPC + 6 

0461 


000610 

PEPC 

EOD 

PAPC+8 

045? 


000612 

PFPC 

EOU 

PAPC+10 

046 3 

1 4740 

0 oooooo 

PRBI 

DAC 

** 

0454 

14 741 

100020 


SRI 


0466 

14742 

-0 01 14740 


JHP* 

PRBI 

04 56 

14 74? 

000007 


DBL 


0457 

14744 

0 02 14724 


DLD 

ABI A 

046B 

14745 

0 06 00600 


DAD 

PAPC 

0459 

1 4746 

0 04 00600 


DST 

PAPC 

0460 

14747 

0 02 14726 


DLD 

BBIA 

0461 

14750 

0 06 00602 


DAD 

PBPC 

0462 

14751 

0 04 00602 


DST 

PBPC 

046? 

14752 

0 02 14730 


DLD 

CBI A 
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M ICFOCO"P TELECOMMUNICATED DATA 



DDP- 

516 

AS 

SEMBLY 

LISTING 


0464 

1 4753 

0 

◦ 6 

00604 

DAD 

PCPC 

oaf 5 

14754 

0 

04 

00604 

DST 

PC PC 

046 £ 

14765 

0 

02 

14732 

DLD 

DBIA 

0467 

14756 

0 

06 

00606 

DAD 

P D PC 

046 0 

1 4757 

0 

04 

00606 

DST 

PDPC 

0460 

1 U760 

0 

02 

14734 

DLD 

EBIA 

0470 

14761 

0 

06 

00610 

DAD 

PEPC 

0471 

1476 2 

0 

04 

00610 

DST 

PE PC 

047? 

1 4763 

0 

02 

1473 6 

DLD 

FBIA 

0470 

14764 

0 

06 

00612 

DAD 

PEPC 

0474 

14765 

0 

04 

00612 

DST 

PEPC 

0476 

14766 

000005 

SGL 


0476 

1 4767 

-0 

01 

1 4740 

JMP* 

PFB I 

0477 

14770 

000012 

END 



1 4771 

000001 




1 4772 

1 77777 




1 4773 

000000 




14 774 

000005 




248 



PROGRAM NAME 
SOURCE: ERCA 
BINARY: BERCA 

ENTRY POINTS (LOCATION): GFDI ('15450), PFDI ( 15544) 

GENERAL DESCRIPTION; 

These two subroutines do the deterministic failure detection and 
isolation for the gyros and accelerometers and determine what fail status 
should be used in the gyro and accelerometer 6x3 matrix multiplication. 

The first part of each subroutine involves transferring the six instruments 
accumulated arguments into the local variables MA, MB, MC, MD, ME 
and MF, storing the current fail status in the local variable FLST, creating 
and storing the proper maximum allowable total squared errors for first 
and second failure detection limits and storing these in the local variables 
FMSE and SMSE and finally restoring the appropriate failure key (an 
indication of whether the last detection cycle was looking for a first or 
second failure) and storing this key in FKEY. A call to the common part 
of this subroutine is then made by the instruction JST PREC. 

Starting at PREC the following functions are performed. First it 
is determined whether to search for a first or second fail. The logic for 
this is simple. If there are no failures, search for a first fail. If there 
are any failures and a first fail was searched for the previous time, search 
for a second fail, otherwise search for a first fail. When this is determined 
the proper maximum allowable total squared error is stored in MASE and 
the proper failure isolation ratio is stored in FALR. Then the error 
calculator is called via the instruction JST ERCA. ERCA calculates and 
stores the instrument errors in EA, EB, EC, ED, EE and EF and returns. 

A call to SQAI is then made which squares the errors, totals them and if a 
detection is made, tries to isolate the faulty instrument. Upon return,the 
return code is stored in RCOD and is a 0 if no detection was made, a 1-6 
if a detection was made and instrument A-F was isolated and a 7 if a detection 
was made and no instrument was isolated. The best estimate of the fail status 
is then made and stored in FLST (see flow chart) and PREC returns to where 
it was called. 
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After the return from PREC the gyro and PIPA failure detection and 
isolation subroutines (GFDI and PFDI) first save the failure key (FKEY) 
for the next call. They then determine what the working fail status (GFST or 
PFST) ought to be depending on the results from PREC (FLST) and the 
statistical fail status (GSFS or PSFS). If FL-ST is 0,0 (neither a first or 
second fail) the statistical fail status is used for the working fail status. 

If FLST indicates two fails (2,4 for example indicating B and D failed) 
then FLST replaces the working fail status. If FLST indicates only a first 
fail then the first statistical fail status will be used for the second working 
fail status unless it agrees with the first fail of FLST in which case the 
second statistical fail status will be used for the second working fail status. 
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FLOW CHART OF PR EC SECTION OF ERCA 25 \ 










MTC^’OCOM P TELECOM P1TJ NIC AT ED DATA 
DDP-516 ASSEMBLY LISTING 


0001 





ABS 

0002 





ORG 

000 2 





SETB 

0004 

15400 



BAS 1 

ESS 

0005 





SUBR 

000* 





SUBR 

0007 

15450 

0 000000 

GPDI 

DAC 

0008 

15451 

000007 


DBL 

0000 

15452 

0 02 

00330 


DLD 

0010 

15453 

0 06 

00344 


DAD 

0017 

15454 

0401 

74 


IRS 

001 2 

15455 

0 04 

16130 


DST 

0012 

15456 

0 02 

00332 


DID 

0014 

15457 

0 06 

00346 


DAD 

0015 

15460 

0401 

74 


LRS 

0015 

15461 

0 04 

16132 


DST 

0017 

15462 

0 02 

00334 


DLD 

0018 

15463 

0 06 

00350 


DAD 

0019 

15464 

0401 

74 


IPS 

0020 

154 65 

0 04 

16134 


DST 

0021 

15466 

0 02 

00336 


DLD 

0022 

15467 

0 06 

00352 


DAD 

0022 

15470 

0401 

74 


LRS 

0024 

15471 

0 04 

16136 


DST 

0025 

15472 

0 02 

00340 


DLD 

0026 

15473 

0 06 

00354 


DAD 

0027 

15474 

0401 

74 


LRS 

0028 

15475 

0 04 

16140 


DST 

00 29 

15476 

0 02 

00342 


DLD 

0030 

1 5477 

0 06 

00356 


DAD 

0031 

15500 

0401 

74 


LRS 

0032 

15501 

0 04 

16142 


DST 

00 3? 

15502 

0 02 

00316 


DLD 

0034 

15503 

0 04 

15652 


DST 

0035 

15504 

0 02 

00574 


DLD 

0036 

15505 

0 06 

00576 


DAD 

0037 

15506 

0 405 

75 


ARS 

0038 

1 C CAT 
1 u * 

0 04 

15640 


DST 

0039 

15510 

0 16 

15640 


NPY 

0040 




* 

DST 

0041 

15511 

0 06 

15642 


DAD 

0042 

15512 

0 04 

15634 


DST 

0043 




* 

DLD 

0044 




♦ 

DAD 

0045 

15513 

0 07 

15644 


D SB 

0046 

15514 

0 04 

15636 


DST 

0047 

15515 

000005 


SGL 

0048 

15516 

0 02 

15660 


LDA 

0049 

15517 

0 04 

15662 


STA 

0050 

15520 

0 10 

15664 


JST 

0051 

15521 

0 02 

15662 


LDA 

0052 

15522 

0 04 

15660 


STA 

0053 

15523 

0 02 

15652 


LDA 

0054 

15524 

101040 


SNZ 

0055 

15525 

0 01 

15537 


JBP 

0056 

15526 

0 04 

00316 


STA 

0057 

15527 

0 02 

15653 


LDA 


' 15400 
BA SI 
40 

GFDI 

PFDI 

** 

GAPA 

GACA 

4 

M A 

GBPA 

GBCA 

4 

MB 

GCPA 

GCCA 

4 

nc 

GDP A 
GDCA 

4 

MD 

GEPA 

GECA 

4 

ME 

GPP A 
GFCA 
4 

MP 

GFST 

FIST 

AXYZ 

CXYZ 

3 

MASE 

HASE ’ 

MASE 

GFSE 

FHSE 

MASE 

GSSE 

GSSE 

SMSE 

GREY 
FKEY 
PR EC 
FKEY 
GKEY 
FLST 

DSPS 

GPST 

FLST+1 
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MICPOCOMP TELECOMMONICATED DATA 


DDP-516 ASSEMBLY LISTING 


0058 

15530 

100040 


SZE 


0059 

15531 

0 

01 

15542 


JMP 

OHFS 

0060 

15532 

0 

02 

00640 


LDA 

GSFS 

0061 

15533 

0 

11 

00316 


CAS 

GFST 

0062 

15534 

0 

01 

15542 


JMP 

OHFS 

0063 

15535 

0 

01 

15541 


JMP 

tISFS+2 

0064 

15536 

0 

01 

15542 


JMP 

OHFS 

006 5 

15537 

0 

02 

00640 

OSFS 

LDA 

GSFS 

0066 

15540 

0 

04 

00316 


STA 

GFST 

0067 

15541 

0 

02 

00641 


LDA 

GS FS + 1 

00 68 

15542 

0 

04 

00317 

OHFS 

STA 

GFST+1 

006° 

15543 

*0 

01 

15450 


JMP* 

GFDI 

0070 

15544 

0 

000000 

PFDI 

DAC 

** 

0071 

15545 

000007 


DBL 


0072 

15546 

0 

02 

00664 


DID 

PAPA 

0073 

15547 

0 

06 

00744 


DAD 

PACA 

0074 

15550 

0401 

74 


LBS 

4 

0076 

15551 

0 

04 

16130 


DST 

MA 

0076 

15552 

0 

02 

00666 


DID 

PBP A 

0077 

15553 

0 

06 

00746 


DAD 

PBCA 

0078 

15554 

0401 

74 


LBS 

4 

007° 

15555 

0 

04 

16132 


DST 

MB 

0080 

15556 

0 

02 

00670 


DLD 

per a 

0081 

15557 

0 

06 

00750 


DAD 

pees. 

008? 

15560 

0401 

74 


LBS 

4 

0083 

15561 

0 

04 

16134 


DST 

MC 

0084 

15562 

0 

02 

00672 


DLD 

PDPA 

0085 

15563 

0 

06 

00752 


DAD 

PDCA 

0006 

15564 

0401 

74 


IBS 

4 

0087 

15565 

0 

04 

16136 


DST 

MD 

0080 

15566 

0 

02 

00674 


DLD 

PE PA 

0089 

15567 

0 

06 

00754 


DAD 

PECA 

0090 

15570 

0401 

74 


LBS 

4 

0091 

15571 

0 

04 

16140 


DST 

ME 

009? 

15572 

0 

02 

00676 


DLD 

PFPA 

0093 

15573 

0 

06 

00756 


DAD 

PFCA 

0094 

15574 

0401 

74 


LBS 

4 

0095 

15575 

0 

04 

16142 


DST 

MF 

0096 

15576 

0 

02 

00320 


DLD 

PF ST 

0097 

15577 

0 

04 

15652 


DST 

FIST 

0098 

15600 

0 

02 

15646 


DLD 

PFSE 

009° 

15601 

0 

04 

15634 


DST 

FMSE 

0100 

15602 

0 

02 

15650 


OLD 

PS SE 

0101 

15603 

0 

04 

15636 


DST 

SMSE 

0102 

15604 

000005 


SGL 


010? 

15605 

0 

02 

15661 


LDA 

PKEY 

0 104 

15606 

0 

04 

15662 


STA 

PKEY 

0105 

15607 

0 

10 

15664 


JST 

PBEC 

0106 

15610 

0 

02 

15662 


LDA 

FKEY 

010f 

15611 

0 

04 

15661 


STA 

PKEY 

0108 

15612 

0 

02 

15652 


LDA 

FLST 

010° 

15613 

101040 


SNZ 


0110 

15614 

0 

01 

15626 


JMP 

UTFS 

0111 

15615 

0 

04 

00320 


STA 

PFST 

0112 

15616 

0 

02 

15653 


LDA 

FLST4-1 

0113 

15617 

100040 


SZE 


0114 

15620 

0 

01 

15631 


JMP 

OOFS 
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MTCFOCO*P TELFCO* MITN ICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


mi*? 

15621 

0 02 00760 


LDA 

PSFS 

0116 

15622 

0 11 00320 


CAS 

PFST 

01 17 

15627 

0 01 15631 


JMP 

UOFS 

ons 

15624 

0 01 15630 


JHP 

UTFS+2 

0119 

15625 

0 01 15631 


JMP 

UOFS 

0120 

15626 

0 02 00760 

DTPS 

LDA 

PSFS 

0121 

1 5627 

0 04 00320 


STA 

PFST 

0122 

1 5630 

0 02 00761 


LDA 

PSFS+1 

0 129 

15631 

0 04 00321 

OOFS 

STA 

PFST* 1 

0 1 2*4 

15632 

-0 01 15544 


JMP* 

PFDI 

012 5 


000330 

GAPA 

EOU 

*330 

0126 


000332 

GBP A 

E0U 

GAPA *2 

0127 


000334 

GCP A 

EQU 

GAPA+4 

012 0 


000336 

GDP A 

EDO 

GAP A + 6 

0129 


000340 

GEPA 

FOO 

GAPA+8 

019 0 


000342 

GFPA 

EQU 

GAP A + 10 

0131 


000344 

GACA 

EOU 

*344 

0132 


000346 

GBCA 

EOU 

GACA+2 

013? 


000350 

GCCA 

EOU 

GACA+4 

0134 


000352 

GDC A 

EQU 

GACA +6 

0135 


000354 

GECA 

EQU 

GACA + 8 

013 6 


000356 

GFCA 

EOU 

GACA + 10 

0137 


000574 

A7YZ 

EQU 

» 574 

01 3 P 


000576 

CXY Z 

EQU 

AXYZ+2 

0139 


000316 

GFST 

eqo 

'316 

0140 


000640 

GSFS 

EQU 

*640 

0141 


000664 

PAPA 

EQU 

*664 

0142 


000666 

PEPA 

EQU 

PAP A +2 

0143 


000670 

PC PA 

EQU 

PAPA+4 

0144 


000672 

PDP A 

EQU 

PAPA + 6 

014 5 


000674 

PEPA 

EQU 

PAPA+8 

0146 


000676 

PFPA 

EQU 

PAPA+1 0 

0147 


000744 

PACA 

EQU 

•744 

01 49 


000746 

PBC A 

EQU 

PACA+2 

014° 


000750 

PCCA 

EQU 

PACA+4 

0150 


000752 

PEC A 

EQU 

PACA + 6 

0151 


000754 

PFC A 

EQU 

PACA+8 

0152 


000756 

PFC A 

EQU 

PACA-+ 1 0 

0157 


000320 

PF ST 

EQU 

•320 

0154 


000760 

PSFS 

EQU 

*760 

0155 

156 34 

000000 

FUSE 

DBP 

0 


15635 

000000 




0156 

15636 

000000 

SMSE 

DBP 

0 


15637 

000000 




0157 

15640 

000000 

BASE 

DBP 

0 


15641 

000000 




0158 

15642 

000000 

GFSE 

OCT 

0,2200 


15643 

002200 




0159 

15644 

000000 

GSSE 

OCT 

0,346 


1 5^ 45 

000346 




0160 

15646 

000000 

PFSE 

OCT 

0,11000 


15647 

011000 




0161 

15650 

000000 

PSSE 

OCT 

0,7146 


15651 

007146 




0162 

15652 

000000 

FIST 

DBP 

0 


15653 

000000 




0 163 

15654 

000000 

FALR 

DBP 

0 
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HICROCOMP TFLECOHHUNICATED DATA 



DDP- 

516 ASSEHRLY 

LISTING 



15655 

oooooo 




0164 

15656 

034343 

FFRT 

OCT 

34343 

0166 

15657 

030600 

SFRT 

OCT 

30600 

0166 

15660 

oooooo 

GKEY 

OCT 

0 

0167 

15661 

OCOOOO 

PKEY 

OCT 

0 

0168 

15662 

OOOOOO 

FKEY 

OCT 

O' 

0168 

15663 

OOOOOO 

rcod 

OCT 

0 

0170 

15664 

0 OOOOOO 

PREC 

DSC 

** 

0171 

15665 

0 02 15652 


LDA 

FLST 

0172 

15666 

100040 


SZE 


017 3 

15667 

0 01 15700 


JHP 

ALOF 

0174 

1 5670 

140040 

FFTR 

CRA 


0175 

1567 1 

0 04 15662 


ST A 

FKEY 

0176 

15672 

0 02 15656 


LDA 

FFRT 

0177 

15 6 7 3 

0 04 15654 


STA 

FAIR 

0178 

15674 

000007 


DBL 


0179 

15675 

0 02 15634 


DID 

FUSE 

0180 

15676 

0 04 15640 


DST 

HASE 

0181 

15677 

0 01 15712 


J HP 

COCA 

018? 

15700 

0 02 15662 

ALOF 

LDA 

FKFY 

018? 

15701 

100040 


SZE 


0184 

15702 

0 01 15670 


JHP 

FFTR 

0 1 R 5 

15 703 

0 02 15652 


LDA 

FLST 

0186 

15704 

0 04 15662 


STA 

FKEY 

0187 

15705 

0 02 15657 


LDA 

SFRT 

0188 

15706 

0 04 15654 


STA 

FAIR 

018° 

15707 

000007 


DBL 


0190 

15710 

0 02 15636 


DID 

SMSE 

0191 

15711 

0 04 15640 


DST 

HASE 

019? 

15712 

000005 

COCA 

SGL 


0193 

15713 

0 10 16001 


JST 

EFC A 

019 4 

15714 

0 10 16276 


J ST 

SQAI 

0196 

15715 

0 02 15662 


LDA 

FKEY 

0 1°6 

15716 

100040 


SZE 


0197 

15717 

0 01 15765 


JHP 

SFSR 

0199 

15720 

0 02 15663 


LDA 

RCOD 

0199 

15721 

100040 


SZE 


0200 

15722 

0 01 15731 


JHP 

NOZE 

0201 

15723 

100004 


SH3 


0202 

15724 

-0 01 15664 


JHP* 

PREC 

0203 

15725 

140040 


CPA 


0204 

15726 

0 04 15652 


STA 

FLST 

0205 

15727 

0 04 15653 


STA 

FLST + 1 

0206 

15730 

-0 01 15664 


JHP* 

PREC 

0207 

15731 

0 07 16622 

NOZE 

SUB 

= 7 

0209 

15732 

101400 


SHI 


0209 

15733 

-0 01 15664 


JHP* 

PREC 

0210 

15734 

0 02 15663 


LDA 

RCOD 

0211 

15735 

0 11 15652 


CAS 

FLST 

0212 

15736 

100000 


SKP 


021? 

15737 

•0 01 15664 


JHP* 

PREC 

0214 

15740 

0 11 15653 


CAS 

FLST+1 

0215 

15741 

100000 


SKP 


0216 

15742 

0 01 15760 


JHP 

SPCA 

0217 

15743 

0 02 15652 


LDA 

FLST 

0218 

15744 

101040 


SNZ 


0219 

15745 

0 01 15753 


JHP 

*+6 
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HICROCOHP TELECOHHONICATED DATA 



DDP-516 

AS5EHBLT 

LISTING 


0220 

15746 

0 

02 15653 


LDA 

FLST+1 

0221 

15747 

101040 


SN2 


0222 

15750 

0 

01 15760 


JMP 

SPCA 

0223 

15751 

100004 


SR3 


0224 

15752 

-0 

01 15664 


JHP* 

PREC 

0225 

15753 

0 

02 15663 


LDA 

RCOD 

0226 

15754 

0 

04 15652 


STA 

FLST 

0227 

15755 

140040 


CR A 


0228 

15756 

0 

04 15653 


STA 

FLST+1 

0229 

15757 

-0 

01 15664 


JHP* 

PREC 

0230 

15760 

0 

02 15652 

SPCA 

LDA 

FLST 

0231 

15761 

0 

04 15653 


STA 

FLST+1 

0232 

15762 

0 

02 15663 


LDA 

RCOD 

0233 

15763 

0 

04 15652 


STA 

FLST 

0234 

15764 

-0 

01 15664 


JHP* 

PREC 

0235 

15765 

0 

02 15663 

SFSR 

LDA 

RCOD 

0236 

15766 

0 

07 16622 


SUB 

=7 

0237 

15767 

101400 


SHI 


0238 

15770 

-0 

01 15664 


JHP* 

PREC 

02 39 

15771 

0 

02 15653 


LDA 

FLST + 1 

0240 

15772 

101040 


SN7 


0241 

15773 

0 

01 15776 


JHP 

*+ 3 

0242 

15774 

100004 


SR 3 


0243 

15775 

-0 

01 15664 


JHP* 

PREC 

0244 

15776 

0 

02 15663 


LDA 

RCOD 

0245 

15777 

0 

04 15653 


STA 

FLST+1 

0246 





SETB 

BAS2 

0247 

16000 

-0 

01 15664 


JHP* 

PREC 

024« 

16001 

0 

000000 

ERCA 

DAC 

** 

0249 

1600? 

0 

02 15662 


LDA 

FFEY 

0250 

16003 

101040 


SNZ 


0251 

16004 

0 

01 16015 


JHP 

DONF 

0252 

16005 

0415 76 


ALS 

2 

0253 

16006 

0 

06 15662 


ADD 

FKEY 

0254 

16007 

0 

06 16022 


ADD 

DCAF 

0255 

16010 

0 

04 16021 


STA 

FLAD 

0256 

16011 

000007 


DBL 


0257 

16012 

-0 

10 16021 


JST* 

FLAD 

0259 

16013 

000005 


SGL 


0259 

16014 

-0 

01 16001 


JHP* 

ERCA 

0260 

16015 

000007 

DONF 

DBL 


0261 

16016 

0 

10 16061 


JST 

NOFL 

0262 

16017 

000005 


SGL 


0263 

16020 

-0 

01 16001 


JHP* 

ERCA 

0264 

16021 

000000 

FLAD 

OCT 

0 

0265 

16022 

0 

016016 

DCAF 

DAC 

*-4 

0266 

16023 

0 

000000 

AFAL 

DAC 

** 

02 67 

16024 

0 

10 16210 


JST 

CACA 

0268 

16025 

0 

04 16130 


D ST 

HA 

02 69 

16026 

0 

10 16061 


JST 

NOFL 

0270 

16027 

-0 

01 16023 


JHP* 

AFAL 

0271 

16030 

0 

000000 

BFAL 

DAC 

** 

0272 

16031 

0 

10 16221 


JST 

CACB 

0273 

16032 

0 

04 16132 


DST 

HB 

0274 

16033 

0 

10 16061 


JST 

NOFL 

0275 

16034 

-0 

01 16030 


JHP* 

BFAL 

0 276 

16035 

0 

000000 

CFAL 

DAC 

** 
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MTCROCOMP TELBCOHHUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0277 

16036 

0 

10 

16232 


JST 

CACC 

0278 

16037 

0 

04 

16134 


DS7 

HC 

02 79 

16040 

0 

10 

16061 


JST 

NOFL 

0280 

16041 

-0 

01 

16035 


JHP* 

CFAL 

0281 

16042 

0 

oooooo 

DFAL 

DAC 

** 

0282 

16043 

0 

10 

16243 


JST 

CACD 

0283 

16044 

0 

04 

16136 


D5T 

HD 

0284 

16045 

0 

10 

16061 


JST 

NOFL 

0288 

16046 

-0 

01 

16042 


JHP* 

DFAL 

0286 

16047 

0 

oooooo 

EFAL 

DAC 

** 

0287 

16050 

0 

10 

16254 


JST 

CACE 

0288 

16051 

0 

04 

16140 


DST 

HE 

0289 

16052 

0 

10 

16061 


JST 

NOFL 

0290 

16053 

“0 

01 

16047 


JHP* 

EF AL 

0291 

16054 

0 

oooooo 

FFAL 

DAC 

** 

0292 

16055 

0 

10 

16265 


JST 

CACF 

0293 

16056 

0 

04 

16142 


DST 

MF 

0294 

16057 

0 

10 

16061 


JST 

NOFL 

0295 

1606 0 

-0 

01 

16054 


JHP* 

FFAL 

0296 

16061 

0 

oooooo 

NOFL 

DAC 

** 

0297 

16062 

0 

10 

16210 


JST 

CACA 

0298 

1606 3 

0 

10 

16221 


JST 

CACB 

0299 

16064 

0 

10 

16232 


JST 

CACC 

0300 

16065 

0 

10 

16243 


JST 

CACD 

0301 

16066 

0 

10 

16254 


JST 

CACE 

0302 

16067 

0 

10 

16265 


JST 

CACF 

0303 

16070 

0 

02 

16130 


DLD 

HA 

0304 

16071 

0 

0-7 

16144 


D SB 

CA 

0305 

16072 

0 

04 

16114 


DST 

EA 

0306 

16073 

3 

02 

161 32 


DLD 

HB 

0307 

16074 

0 

07 

16146 


DSB 

CB 

0308 

16075 

0 

04 

16116 


DST 

EB 

0309 

16076 

0 

02 

16134 


DLD 

HC 

0310 

16077 

0 

07 

16150 


DSB 

cc 

031 1 

16100 

0 

04 

16120 


DST 

EC 

0312 

16101 

0 

02 

16136 


DLD 

HD 

0313 

16102 

0 

07 

16152 


DSB 

CD 

0314 

16103 

0 

04 

16122 


DST 

ED 

0315 

16104 

0 

02 

16140 


DLD 

HE 

0 316 

16105 

0 

07 

16154 


DSB 

CE 

0317 

16106 

0 

04 

16124 


DST 

EE 

0318 

16107 

0 

02 

16142 


DLD 

MF 

0319 

16110 

0 

07 

16 156 


DSB 

CF 

0320 

16111 

0 

04 

16126 


DST 

EF 

0321 

16112 

-0 

01 

16061 


JHP* 

NOFL 

0322 

16114 

oooooo 

EA 

DBP 

0 


16115 

000000 




0 3 23 

16116 

oooooo 

EB 

DBP 

0 


16117 

oooooo 




03 24 

16120 

000900 

EC 

DBP 

0 


16121 

oooooo 




0325 

16122 

oooooo 

ED 

DBP 

0 


16123 

oooooo 




0326 

16124 

oooooo 

EF 

DBP 

0 


16125 

oooooo 




0327 

16126 

oooooo 

EF 

DBP 

0 


16127 

oooooo 
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MICFOCOMP TELECOMMUNICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


03 28 

16130 

000000 

M A 

DBP 

0 


16131 

000000 




0329 

16132 

000000 

MB 

DBP 

0 


16133 

000000 




0330 

16134 

000000 

MC 

DBP 

0 


16135 

000000 




0331 

16136 

000000 

MD 

DBP 

0 


16137 

000000 




03 3 2 

16140 

000000 

ME 

DBP 

0 


16141 

000000 




0333 

16142 

000000 

MF 

DBP 

0 


16143 

000000 




0334 

16144 

000000 

CA 

DBP 

0 


16145 

000000 




033 8 

16146 

000000 

CB 

DBP 

0 


16147 

000000 




0336 

16150 

000000 

CC 

DBP 

0 


16151 

000000 




0 337 

16152 

000000 

CD 

DBP 

0 


16153 

000000 




0338 

16154 

000000 

CE 

DBP 

0 


16155 

000000 




0339 

16156 

000000 

CF 

DBP 

0 


16157 

000000 




03 40 

16160 

0 000000 

MSPT 

DAC 

** 

0341 

16161 

0 04 16200 


D ST 

TE Ml 

0342 

16162 

0 16 16205 


MPY 

HPTT+ 1 

0343 

1616 3 

0401 77 


LBS 

1 

0344 

16164 

0 04 16202 


DST 

TEM 2 

0345 

16165 

0 02 16204 


DLD 

RPTT 

0346 

16166 

0 16 16201 


MPY 

TEM1+1 

0347 

16167 

0401 77 


LBS 

1 

0348 

16170 

0 06 16202 


DAD 

TEM 2 

0 344 

16171 

0 06 16206 


DAD 

ROND 

0350 

16172 

0401 62 


LBS 

14 

0351 

16173 

o 04 16202 


DST 

TE M2 

0352 

16174 

0 02 16200 


DLD 

TEM 1 

0 3 53 

16175 

0 16 16204 


MPY 

RPTT 

0354 

16176 

0 06 16202 


DAD 

TEM 2 

0355 

16177 

-0 01 16160 


JHP* 

MSPT 

03 56 

16200 

000000 

TEK1 

DBP 

0 


16201 

000000 




03 57 

16202 

000000 

TEH2 

DBP 

0 


16203 

oooooo 




0358 

16204 

034476 

RPTT 

OCT 

34476,22706 


16205 

022706 




0359 

16206 

oooooo 

BOND 

OCT 

0, 20000 


16207 

020000 




0360 

16210 

o oooooo 

CACA 

DAC 

** 

0361 

16211 

0 02 16132 


DLD 

MB 

0362 

16212 

0 07 16134 


DSB 

MC 

0363 

16213 

0 07 16136 


D SB 

MD 

0364 

16214 

0 06 16140 


DAD 

ME 

0365 

16215 

0 06 16142 


DAD 

MF 

0366 

16216 

0 10 16160 


JST 

MSPT 

0367 

16217 

0 04 16144 


DST 

CA 

0368 

16220 

-0 01 16210 


JMP* 

CACA 
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HTCROCOHP TELECOMHUNICATED DATA 



DDP-516 

ASSEHBLY 

LISTING 


0369 

16221 

0 

000000 

CACB 

DAC 

** 

0370 

16222 

0 

02 

16130 


DLD 

HA 

0371 

16223 

0 

06 

16134 


DAD 

HC 

0372 

16224 

0 

06 

16136 


DAD 

HD 

0373 

16225 

0 

06 

16140 


DAD 

HE 

0374 

16226 

0 

06 

16142 


DAD 

HF 

0375 

16227 

0 

10 

16160 


JST 

HSPT 

0376 

16230 

0 

04 

16146 


DST 

CB 

0377 

16231 

-0 

01 

16221 


JHP* 

CACB 

0378 

16232 

0 

000000 

C ACC 

DAC 

** 

0 379 

16233 

0 

02 

16132 


DLD 

HB 

0380 

16234 

0 

07 

161 30 


DS3 

HA 

0381 

16235 

0 

06 

161 36 


DAD 

HD 

0382 

16236 

0 

07 

16140 


DSB 

HE 

0383 

16237 

0 

06 

16142 


DAD 

HF 

0384 

16240 

0 

10 

16160 


JST 

HSPT 

038 5 

16241 

0 

04 

161 50 


DST 

CC 

0386 

16242 

-0 

01 

16232 


JHP* 

CACC 

0387 

16243 

0 

000000 

CACD 

DAC 

** 

0388 

16244 

0 

02 

16132 


DLD 

HB 

0388 

16245 

0 

07 

161 30 


DSB 

HA 

0390 

16246 

0 

06 

16134 


DAD 

HC 

0391 

16247 

0 

06 

16140 


DAD 

ME 

0392 

16250 

0 

07 

16142 


DSB 

HF 

0393 

16251 

0 

10 

16160 


JST 

HSPT 

03 94 

16252 

0 

04 

16152 


DST 

CD 

0395 

16253 

-0 

01 

16243 


JHP* 

CACD 

0396 

16254 

0 

000000 

CACE 

DAC 

** 

0397 

16255 

0 

02 

161 30 


DLD 

HA 

0398 

16256 

0 

06 

16132 


DAD 

HB 

039Q 

16257 

0 

07 

16134 


DSB 

HC 

0400 

16260 

0 

06 

16136 


DAD 

HD 

0401 

16261 

0 

07 

16142 


DSB 

HF 

0402 

16262 

0 

10 

16160 


JST 

HSPT 

0403 

16263 

0 

04 

16154 


DST 

CE 

0404 

16264 

-0 

01 

16254 


JHP* 

CACE 

0405 

16265 

0 

000000 

CACF 

DAC 

** 

0406 

16266 

0 

02 

16130 


DLD 

HA 

0 407 

16267 

0 

06 

16132 


DAD 

HB 

0408 

16270 

0 

06 

16134 


DAD 

HC 

0409 

16271 

0 

07 

16136 


DSB 

HD 

0410 

16272 

0 

07 

16 140 


DSB 

HE 

0411 

16273 

0 

10 

16160 


JST 

HSPT 

0412 

16274 

0 

04 

16156 


DST 

CF 

0413 

16275 

-0 

01 

16265 


JHP* 

CACF 

0414 

16276 

0 

000000 

SOAI 

DAC 

** 

0415 

16277 

000007 


DBL 


0416 

16300 

0 

02 

16114 


DLD 

EA 

0417 

16301 

101400 


SHI 


0418 

16302 

0 

01 

16305 


JHP 

* + 3 

0419 

16303 

0 

07 

16114 


DSB 

EA 

0420 

16304 

0 

07 

16114 


DSB 

EA 

0421 

16305 

100040 


SZE 


0422 

16306 

0 

01 

16466 


JHP 

OVFL 

0423 

16307 

000201 


IAB 


0424 

16310 

0 

04 

16526 


DST 

ASE 

0425 

16311 

0 

16 

16526 


HPY 

ASE 
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hic^ocomp ■ 

TELECOHHOK ICATED 

DATA 



DDP 

-516 ASSEMBLY LISTING 


0426 

16312 

0 04 16526 

D ST 

ASE 

0427 

16 313 

0 02 16116 

DLD 

EB 

0428 

16314 

101400 

SHI 


0429 

16315 

0 01 16320 

JHP 

*♦3 

0430 

16316 

0 07 16116 

DSB 

EB 

0431 

16317 

0 07 16116 

DSB 

EB 

0432 

16320 

100040 

SZE 


0433 

16321 

0 01 16466 

JHP 

OVFL 

0434 

16322 

000201 

IAB 


0435 

16323 

0 04 16530 

DST 

BSE 

0436 

16324 

0 16 16530 

HPY 

BSE 

0437 

16325 

0 04 16530 

• DST 

BSE 

0438 

16326 

0 02 16120 

DLD 

EC 

0439 

16327 

101400 

SHI 


0440 

16330 

0 01 16333 

JHP 


0441 

16331 

0 07 16120 

DSB 

EC 

0442 

16332 

0 07 16120 

DSB 

EC 

0443 

16333 

100040 

SZE 


0444 

16334 

0 01 16466 

JHP 

OVFL 

0445 

16335 

000201 

IAB 


0446 

16 336 

0 04 16532 

DST 

CSE 

044 7 

16337 

0 16 16532 

HPY 

CSE 

0448 

16340 

0 04 16532 

DST 

CSE 

0449 

16341 

0 02 16122 

DLD 

ED 

0450 

16342 

101400 

SHI 


0451 

16343 

0 01 16346 

JHP 

*♦3 

0452 

16344 

0 07 16122 

DSB 

ED 

0453 

1 6345 

0 07 16122 

DSB 

ED 

0454 

16346 

100040 

SZE 


0455 

16347 

0 01 16466 

JHP 

OVFL 

0456 

16350 

000201 

IAB 


0457 

16351 

0 04 16534 

DST 

DSE 

0458 

16352 

0 16 16534 

HPY 

DSE 

0459 

16353 

0 04 16534 

DST 

DSE 

0460 

16354 

0 02 16124 

DLD 

EE 

0461 

16355 

101400 

SHI 


0462 

16356 

0 01 16361 

JHP 

*♦3 

0463 

16357 

0 07 16124 

DSB 

EE 

0464 

16360 

0 07 16124 

DSB 

EE 

0465 

16361 

100040 

SZE 


0466 

16362 

0 01 16466 

JHP 

OVFL 

0467 

16363 

000201 

TAB 


0468 

16364 

0 04 16536 

DST 

ESE 

0469 

16365 

0 16 16536 

HPY 

ESE 

0470 

16366 

0 04 16536 

DST 

ESE 

0471 

16367 

0 02 16126 

DLD 

EF 

0472 

16370 

101400 

SHI 


0473 

16371 

0 01 16374 

JHP 

*♦3 

0474 

16372 

0 07 16126 

DSB 

EP 

0475 

16373 

0 07 16126 

DSB 

EF 

0476 

16374 

100040 

SZE 


0477 

16375 

0 01 16466 

JHP 

OVFL 

0478 

16376 

000201 

IAB 


0479 

16377 

0 04 16540 

DST 

FSE 

0480 

16400 

0 16 16540 

HPY 

FSE 

0481 

16401 

0 04 16540 

DST 

FSE 

0482 

16402 

0 06 16526 

DAD 

ASE 
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MICPOCOMP TELECOM WON IC AT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0483 

16403 

100001 

SBC 


0 48 4 

16404 

0 01 16466 

JHP 

OVFL 

0485 

16405 

0 06 16530 

DAD 

BSE 

0486 

16406 

100001 

SRC 


0487 

16407 

0 01 16466 

JHP 

OVFL 

0488 

16410 

0 06 16532 

DAD 

CSE 

0489 

16411 

100001 

SRC 


0490 

16412 

0 01 16466 

JHP 

OVFL 

0491 

16413 

0 06 16534 

DAD 

DSE 

0492 

16414 

100001 

SRC 


0493 

16416 

0 01 16466 

JHP 

OVFL 

0494 

16416 

0 06 16536 

DAD 

ESE 

0495 

16417 

100001 

SRC 


0496 

16420 

0 01 16466 

JHP 

OVFL 

0497 

16421 

0 04 16542 

DST 

TSE 

0498 

16422 

0 07 15640 

D SB 

MASE 

049° 

16423 

100400 

SPL 


0500 

16424 

0 01 16472 

JHP 

ZRTO 

0501 

16426 

0 02 15654 

DLD 

FALR 

0502 

16426 

0 16 16543 

MPY 

TSE+1 

0503 

16427 

000201 

I A B 


0 50 4 

16430 

140040 

CRA 


0505 

16431 

0 04 16202 

DST 

TEH 2 

0506 

16432 

0 02 16542 

DLD 

TSE 

0507 

16433 

0 16 15654 

MPY 

FALR 

0509 

16434 

0 06 16202 

DAD 

TEH2 

0509 

1 643R 

0 04 16202 

DST 

TEH 2 

0510 

16436 

0 02 16526 

DLD 

ASE 

0511 

1 6437 

0 07 16202 

DSR 

TEH 2 

0512 

1 6440 

101400 

SMI 


0513 

16441 

0 01 16476 

JHP 

ISOA 

0514 

16442 

0 02 16530 

DLD 

BSE 

0515 

16443 

0 07 16202 

DSB 

TEH 2 

0516 

16444 

101400 

SHI 


0517 

164 45 

0 01 16502 

JHP 

TSOB 

0518 

16446 

0 02 16532 

DLD 

CSE 

0519 

16447 

0 07 16202 

DSB 

TEM2 

0520 

16450 

1 01400 

SMI 


0521 

16451 

0 01 16506 

JHP 

ISOC 

0522 

16452 

0 02 16534 

DLD 

DSE 

0523 

1 6453 

0 07 16202 

DSB 

TEH2 

0524 

16U54 

101400 

SMt 


0525 

16455 

0 01 16512 

JHP 

ISOD 

0526 

16456 

0 02 16536 

DLD 

ESE 

0527 

16457 

0 07 16202 

DSB 

TEH2 

052B 

16460 

101400 

SHI 


0529 

18461 

0 01 16516 

JHP 

ISOE 

0530 

16462 

0 02 16540 

DLD 

FSE 

0531 

16463 

0 07 16202 

DSB 

TEH2 

053? 

16464 

101400 

SHI 


0533 

1 6465 

0 01 16522 

JHP 

ISOF 

0534 

16466 

000005 

OVFL SGL 


0535 

16467 

0 02 16622 

LDA 

= 7 

0536 

16470 

0 04 15663 

STA 

RCOD 

0537 

16471 

>0 01 16276 

JHP* 

SQAI 

0538 

16472 

000005 

ZRTO SGL 


0539 

16473 

140040 

CRA 
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MICFOCOMP TELECOHHUNICAT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


05un 

16474 

0 04 15663 


STA 

ROOD 

0541 

16475 

-0 01 16276 


JMP* 

SQAI 

054? 

16476 

000005 

ISOA 

SGL 


054.3 

16477 

0 02 16621 


IDA 

= 1 

054U 

16500 

0 04 15663 


STA 

RCOD 

0545 

16501 

-0 01 16276 


JMP* 

SQAI 

0540 

16502 

000005 

ISOB 

SGL 


0547 

16503 

0 02 16620 


IDA 

-2 

0548 

16504 

0 04 15663 


STA 

RCOD 

0549 

16505 

*0 01 16276 


JMP* 

SO A I 

0550 

16506 

000005 

ISOC 

SGL 


0551 

16507 

0 02 16617 


LDA 

~3 

0552 

16510 

0 04 15663 


STA 

RCOD 

0553 

16511 

-0 01 16276 


JMP* 

SOAI 

0554 

16512 

000005 

ISOD 

SGL 


0 555 

16513 

0 02 16616 


LDA 

= 4 

0556 

16 514 

0 04 15663 


STA 

RCOD 

0557 

16515 

-0 01 16276 


JMP* 

SOAI 

0559 

16516 

000005 

ISOE 

SGL 


0559 

16517 

0 02 16615 


IDA 

= 5 

0560 

16620 

0 04 15663 


STA 

RCOD 

0561 

16521 

-0 01 16276 


JMP* 

SOAI 

0 56 2 

16522 

000005 

ISOF 

SGL 


0563 

16523 

0 02 16614 


LDA 

=6 

0564 

16524 

0 04 15663 


STA 

RCOD 

056 c 

16525 

-0 01 16276 


JMP* 

SQAI 

0566 

16526 

000000 

ASE 

EBP 

0 


16527 

000000 




0567 

16530 

000000 

BSE 

DBP 

0 


16531 

000000 




0 56 8 

16532 

000000 

CSE 

DBP 

0 


16 5 3 3 

000000 




0569 

16534 

oooooo 

DSE 

DBP 

0 


16535 

000000 




0570 

16536 

oooooo 

ESE 

DBP 

0 


16537 

oooooo 




0571 

16540 

oooooo 

FSE 

DBP 

0 


16541 

oooooo 




0^72 

16 542 

0 000 00 

TSE 

DBP 

0 


1654 3 

oooooo 




0573 

16544 


BAS2 

BSS 

40 

0574 

16614 

000006 


END 



16615 

000005 





16616 

000004 





16617 

000003 





16620 

000002 





16621 

000001 





16622 

000007 
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PROGRAM NAME 
SOURCE: ROM5 
BINARY: BROM5 

ENTRY POINTS (location): ROMS C15000) 
ACCESSIBLE VARIABLES: WXPR ('15333) 
WYPR ('15334), WZPR ('15335) 

GENERAL DESCRIPTION: 


When the STRU strapdown system is subjected to a rotational environ- 

2 

ment its accelerometers will sense acceleration due to uj R and uR. Since 
the accelerometers do not all sense acceleration at the same point, these 
rotation- induced accelerations will make the accelerometers appear to be 
in disagreement. This subroutine compensates the accelerometers to make 
them look as if they are all sensing acceleration at the same point (since 
the location of this point is not critical we pick the center of the A 
accelerometer so that at least the A accelerometer need not be compensated). 


Consider some point which has an R vector from the center of the A 
accelerometer of (RX, RY, RZ). The acceleration sensed at this point 
different from the acceleration sensed at the center of the A accelerometer 
is: 


i(u u RY + u u RZ - u 2 R -- u 2 RX + wRZ-i) RY) 
x y xz y x z y z 

+ i(w u RZ + u u RX - u 2 RY - u 2 RY + w RX - u RZ) 

J yz yx x z z x 

+ 'k(w uRX + uuRY-u 2 RZ - u 2 RZ + u RY - d RX) 
z x zy x y x y 


B, C, D, E and F accelerometers can be corrected by adding the 
negative of the acceleration each one senses due to rotation. For the F 
accelerometer this would be 


-S (Z axis acceleration) + C (Y axis acceleration) 


where 


C = cosine, S = sine 
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or 

• -S(u u RFX + w u RFY - w. 2 RFZ - w. 2 RFZ + u RFY - & RFX) 
z x z y x y x y 

2 ? 

+C (w io z RFZ + u u RFX'- u x RFY - RFY + 6 z RFX - u x RFZ) 

y ^ y 

these terras can be combined to give: 

C RFX(u to + w ) 
y x z' 

+ C RFY(-u 2 - u 2 ) 

X z 

+ C RFZ(u w - u ) 
y z x 

+ S RFX(-cj u + u ) 
z x y 

+ S RFY(-u u - 0 ) 
z y x 

+ S RFY (u 2 + tj 2 ) 

x y 

a similar set of corrections can be derived for accelerometers B, C, D 
and E. 

22 2 

This subroutine first calculates u) uj , i>* ' u> » u? u* » u? , u? » u> , 

x y x z y z x y z 

ui , do and to using A 9 , A 6 and A 9 over one update interval as an 
x y z x y z 

indication of u> , u> and u? . It then calculates, 
x y z 

PARI = io u + cl) 
y x z 

PAR2 = u 2 + u 2 
x z 

PAR3 = <i> w - £ » 

y Z X 

PAR4 = u 2 u x - u y 

PAR5 = w D - £ 
z y x 

PAR6 = w x 2 + u y 2 


PAR7 = io 2 + oj 2 

y z 
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PARS = uju - to 
x y z 


PAR 9 - u x w z + <b y 
F's correction can now be defined as: 


C RFX PARI 
-C RFY PAR2 
+C RFZ PAR 3 
-S RFX PAR 4 
-S RFY PAR5 
+S RFZ PARS 


Without doing the whole derivation B's correction can be defined as: 

-C RBX PAR 4 
-C RBY PARS 
+C RBZ PAR6 
-S RBX PAR 7 
+S RBY PAR8 
+S RBZ PAR9 

C, D and E have similar corrections. 

The terms in the above equations such as -C RBX are constants and 
are stored as such in this subroutine. They are functions of the following 
table of distances which was made from detailed drawings of the STRU 
Pi-frame and STRU accelerometers. 


^^XIS 

A 

B 

C 

D 

E 

F 

R(cm) 







X 

0 

-8. 603 

13. 937 

13. 937 

2.718 

0, 902 

Y 

0 

-1. 816 

-24. 021 

-15.418 

-27. 081 

11. 130 

Z 

0 

0 

2.482 

0. 665 

1.085 

1. 085 
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A look at the subroutine listing will show how the above equations are 
implemented. 
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MTCPCCOMP TELECOMMUNICATED DATA 



DDP- 

■516 

ASSEMBLY 

LISTING 


0001 





ABS 


0002 





ORG 

* 15000 

0003 





SUBF 

WXPR 

ooou 





SO BP 

MY PR 

0005 





SUBR 

WZ PR 

0006 





SOBR 

ROMS 

0007 

15000 

0 

000000 

ROMS DAC 

** 

00 OR 

15001 

0 

02 

00414 

LDA 

wx 

0009 

15002 

0 

16 

00416 

MPY 

MY 

0010 

15003 

0 

04 

15322 

STA 

WX W Y 

0011 

15004 

0 

02 

00414 

LDA 

MX 

0012 

1 5005 

0 

16 

00420 

MPY 

W7 

0013 

15006 

0 

04 

15323 

STA 

MX MZ 

0014 

15007 

0 

02 

00416 

LDA 

MY 

0015 

15010 

0 

16 

00420 

MPY 

WZ 

0016 

15011 

0 

04 

15324 

STA 

WYWZ 

0017 

15012 

0 

02 

00414 

LDA 

MX 

0019 

15013 

0 

16 

00414 

MPY 

MX 

0019 

15014 

0 

04 

15325 

STA 

vxsq 

0020 

15015 

0 

02 

00416 

LDA 

WY 

0021 

15016 

0 

16 

00416 

MPY 

MY 

0022 

15017 

0 

04 

15326 

STA 

WYSQ 

0023 

15020 

/ 0 

02 

00420 

LDA 

HZ 

0024 

15021 

0 

16 

00 4 20 

MPY 

MZ 

0025 

15022 

0 

04 

15327 

STA 

W7S0 

0026 

15023 

0 

02 

00414 

LDA 

MX 

0027 

15024 

0 

07 

15333 

SUB 

HXPR 

0029 

15025 

0415 

73 

ALS 

5 

0029 

15026 

0 

04 

15330 

STA 

MXDT 

0030 

15027 

0 

02 

00416 

LDA 

MY 

0031 

15030 

0 

07 

15334 

SOB 

WYPR 

0032 

15031 

0415 

73 

ALS 

5 

0033 

15032 

0 

04 

15331 

STA 

MYDT 

0034 

15033 

0 

02 

00420 

LDA 

HZ 

00 35 

15034 

0 

07 

15335 

SUB 

MZPR 

0036 

15035 

0415 

73 

ALS 

5 

0037 

15036 

0 

04 

15332 

STA 

MZDT 

0039 

15037 

0 

06 

15322 

ADD 

WX W Y 

0039 

15040 

0 

04 

15262 

STA 

PAP1 

0040 

15041 

0 

16 

15336 

MPT 

CRFX 

0041 

15042 

000007 

DBL 


0042 

15043 

0 

04 

15304 

DST 

CORF 

0043 

15044 

000005 

SGI 


0044 

15045 

0 

02 

15325 

LDA 

WXSQ 

0045 

15046 

0 

06 

15327 

ADD 

WZSQ 

0046 

15047 

0 

04 

15264 

STA 

PAP 2 

0047 

15050 

0 

16 

15337 

MPY 

CPF Y 

0048 

15051 

000007 

DBL 


0049 

15052 

0 

06 

15304 

DAD 

CORF 

0050 

15053 

0 

04 

15304 

DST 

CORF 

0051 

15054 

000005 

SGL 


0052 

15055 

0 

02 

15324 

LDA 

HY WZ 

0053 

15056 

0 

07 

15330 

SOB 

MXDT 

0054 

15057 

0 

04 

15266 

STA 

PAR3 

0055 

15060 

0 

16 

15340 

MPY 

CRF2 

0056 

15061 

000007 

DBL 


0057 

15062 

0 

04 

15316 

DST 

TEM1 
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MICFOCOMP TELECOMMUNICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


00 SR 

1506 3 

0 06 

15304 

DAD 

COPE 

00 5°* 

15064 

0 04 

15304 

D ST 

CORF 

0060 

15065 

000005 

SGL 


0061 

15066 

0 02 

15323 

IDA 

wxwz 

006? 

15067 

0 07 

15331 

SUB 

WYDT 

006 3 

15070 

0 04 

15270 

STA 

PAF4 

O06U 

15071 

0 16 

15341 

MPY 

SRFX 

0065 

15072 

000007 

DBL 


0066 

15073 

0 06 

15304 

DAD 

CORF 

006? 

15074 

0 04 

15304 

DST 

COFF 

006R 

15 075 

000005 

SGL 


0069 

15076 

0 02 

15324 

LDA 

NYWZ 

0070 

15077 

0 07 

15330 

SUB 

HXDT 

0071 

15100 

0 04 

15272 

STA 

PAP5 

0072 

15101 

0 16 

15342 

MPY 

SPFY 

0073 

15102 

000007 

DBL 


0074 

15103 

0 06 

15304 

DAD 

CORF 

0076 

15104 

0 04 

15304 

DST 

CORF 

0076 

15105 

000005 

SGL * 


0077 

15106 

0 02 

15325 

LDA 

wxso 

0078 

15107 

0 06 

15326 

ADD 

WYSO 

0 07 9 

15110 

0 04 

15274 

STA 

PAF6 

CORO 

15111 

0 16 

15343 

MPY 

SR FZ 

0081 

15112 

000007 

DBL 


0082 

15113 

0 04 

15306 

DST 

COPE 

0083 

15114 

0 06 

15304 

DAD 

COFF 

0084 

15115 

0 401 

67 

LRS 

9 

0085 

15116 

0 06 

00612 

DAD 

•612 

0006 

15117 

0 04 

00612 

DST 

•612 

0087 

15120 

000005 

SGL 


0090 

15121 

0 02 

15326 

LDA 

WY5Q 

00B9 

15122 

0 06 

15327 

ADD 

NZ5Q 

0090 

15123 

0 04 

15276 

STA 

PAF7 

009 1 

15124 

0 16 

15351 

MPY 

CP D X 

0092 

15125 

000007 

DBL 


0093 

1M?f 

0 04 

15310 

D S" 

CORD 

0094 

15127 

0 04 

15312 

DST 

CO PC 

0095 

15130 

000005 

SGL 


0096 

15131 

0 02 

15322 

LDA 

WXRY 

0097 

15132 

0 07 

15332 

SUB 

HZDT 

0098 

15133 

0 04 

15300 

STA 

PARS 

0099 

151 34 

0 16 

15352 

MPY 

CRDY 

0100 

15135 

000007 

DBL 


0101 

15136 

0 06 

15310 

DAD 

CORD 

0102 

15137 

0 04 

15310 

DST 

CORD 

0103 

15140 

000005 

SGL 


0104 

15141 

0 02 

15323 

LDA 

WXWZ 

0105 

1 5142 

0 06 

15331 

ADO 

WYDT 

0106 

15143 

0 04 

15302 

STA 

PAR9 

0107 

15144 

0 16 

15353 

MPY 

CRDZ 

0109 

15145 

000007 

DBL 


0109 

15146 

0 06 

15310 

DAD 

CORD 

0110 

15147 

0 04 

15310 

DST 

CORD 

0111 

15150 

0 02 

15264 

DLD 

PAR2 

0112 

15151 

0 16 

15345 

MPY 

CREY 

0113 

15152 

0 06 

15306 

DAD 

CORE 

0114 

15153 

0 07 

15316 

DSB 

TEM 1 
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WICFOCOMP TELECOM MB NIC AT ED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


Oils 

15154 

0 

04 

15306 

DST 

CORE 

0116 

15155 

0 

02 

15270 

OLD 

PAP4 

0117 

15156 

0 

16 

15346 

MPY 

SREX 

0118 

15157 

0 

06 

15306 

DAD 

CORE 

0119 

15160 

0 

04 

15306 

DST 

COPE 

0120 

15161 

0 

02 

15272 

DLD 

PAP 5 

0121 

15162 

0 

16 

15350 

MPY 

SPEY 

012? 

15163 

0 

06 

15306 

DAD 

CORE 

0123 

15164 

0401 

67 

LRS 

9 

0124 

15165 

0 

06 

00610 

DAD 

'610 

0125 

15166 

0 

04 

00610 

DST 

'610 

0128 

15167 

0 

02 

15262 

DLD 

PAP 1 

0127 

15170 

0 

16 

153 54 

MPY 

SPDX 

0128 

15171 

0 

04 

15320 

DST 

TEM2 

0129 

15172 

0 

06 

15310 

DAD 

COPD 

01 30 

15173 

0 

04 

15310 

DST 

CORD 

0131 

15174 

0 

02 

15264 

DLD 

PAR2 

0132 

15175 

0 

16 

15355 

MPY 

SR DY 

0133 

15176 

0 

06 

15310 

DAD 

COPD 

0134 

15177 

0 

04 

15310 

DST 

CORD 

0135 

15200 

0 

02 

15266 

DLD 

PAP 3 

0138 

15201 

0 

16 

15356 

MPY 

SPDZ 

0137 

15202 

/ 0 

06 

15310 

DAD 

CORD 

0138 

15203 

04 

•01 

87 

LRS 

9 

0139 

15204 

0 

06 

00606 

DAD 

'606 

0140 

15205 

0 

04 

00606 

DST 

'606 

0141 

15206 

0 

02 

15300 

DLD 

PARS 

0142 

15207 

0 

16 

15357 

MPY 

CRCY 

0143 

15210 

0 

06 

15312 

DAD 

COPC 

0144 

15211 

0 

07 

15320 

DSB 

TEH 2 

0145 

15212 

0 

04 

15312 

DST 

COPC 

0146 

1 5213 

0 

02 

15302 

DLD 

P A 5 9 

0147 

15214 

0 

16 

15360 

MPY 

CPCZ 

0148 

15215 

0 

06 

15312 

DAD 

CORC 

0149 

15216 

0 

04 

15312 

DST 

CORC 

0150 

15217 

0 

02 

15264 

DLD 

PAR 2 

0151 

15220 

0 

16 

15361 

MPY 

SRC Y 

0152 

15221 

0 

06 

15312 

DAD 

CORC 

0153 

15222 

0 

04 

15312 

DST 

CORC 

0154 

15223 

0 

02 

15266 

DLD 

PAR 3 

0155 

15224 

0 

16 

15362 

MPY 

SRCS 

0156 

15225 

0 

06 

15312 

DAD 

CORC 

0 157 

15226 

0401 

67 

LRS 

9 

0158 

15227 

0 

06 

00604 

DAD 

*604 

0159 

15230 

0 

04 

00604 

DST 

'604 

0160 

1523 1 

0 

02 

15270 

DLD 

PAR4 

0161 

15232 

0 

16 

15363 

MPY 

CRBX 

016? 

15233 

0 

04 

15314 

DST 

COPB 

0163 

15234 

0 

02 

15272 

DLD 

PAR5 

0164 

15235 

0 

16 

15364 

MPY 

CR BY 

0165 

15236 

0 

06 

15314 

DAD 

COPB 

0166 

15237 

0 

04 

15314 

DST 

CORB 

0167 

15240 

0 

02 

15276 

DLD 

PAR7 

0168 

15241 

0 

16 

15365 

MPY 

SR BX 

0169 

15242 

0 

06 

15314 

DAD 

CORB 

0170 

15243 

0 

04 

15314 

DST 

CORB 

0171 

15244 

0 

02 

15300 

DLD 

PARS 


269 



HICROCOFP TELECOMHUN TCATEO DATA 



DDP-! 

SI 6 ASSEMBLY 

LISTING 


0172 

15245 

0 16 15366 

HPY 

SR BY 

0173 

15246 

0 06 15314 

DAD 

CORB 

0 17*1 

15247 

0401 67 

LRS 

9 

0175 

15250 

0 06 00602 

DAD 

•602 

0175 

15251 

0 04 00602 

DST 

•602 

0177 

15252 

000005 

SGL 


0176 

15253 

0 02 00414 

LDA 

WX 

0170 

15254 

0 04 15333 

ST A 

WXPR 

01*0 

15255 

0 02 00416 

LDA 

WY 

0161 

15256 

0 04 15334 

STA 

WYPR 

016? 

15257 

0 02 00420 

LDA 

wz 

0163 

15260 

0 04 15335 

STA 

WZPR 

0184 

15261 

-0 01 15000 

JMP* 

ROWS 

0 18 c 

15262 

000000 

PARI DBP 

0 


15263 

000000 



0186 

15264 

000000 

PAR2 DBP 

0 


15265 

000000 



0167 

15266 

000000 

PARI DBP 

0 


15267 

000000 



016° 

15270 

000000 

PAR4 DBP 

0 


15271 

000000 



0180 

15272 

000000 

PAR5 DBP 

0 


15273 

000000 



0190 

15274 

oooooo 

PAR6 DBP 

0 


15275 

000000 



0191 

15276 

oooooo 

PAR7 DBP 

0 


15277 

oooooo 



0192 

15300 

oooooo 

PAR8 DBP 

0 


15301 

oooooo 



019 3 

15302 

oooooo 

PAF9 DBP 

0 


15303 

oooooo 



01<>4 

15704 

oooooo 

CORF DBP 

0 


15305 

oooooo 



0195 

15306 

oooooo 

CORE DBP 

0 


15307 

oooooo 



0196 

15310 

oooooo 

CORD DBP 

0 


15311 

oooooo 



0197 

15312 

oooooo 

CORC DBP 

0 


15313 

oooooo 



0198 

15314 

oooooo 

CORB DBP 

0 


15315 

oooooo 



0199 

15316 

oooooo 

TEH1 DBP 

0 


15317 

oooooo 



0200 

15320 

oooooo 

TEH2 DBP 

0 


15321 

oooooo 



0201 

15322 

oooooo 

NXWY OCT 

0 

0202 

15323 

oooooo 

WXWZ OCT 

0 

0203 

15324 

oooooo 

HY«Z OCT 

0 

0204 

15325 

oooooo 

WXSQ OCT 

0 

0205 

15326 

oooooo 

WYSQ OCT 

0 

0206 

15327 

oooooo 

WZSQ OCT 

0 

0207 

15330 

oooooo 

WXDT OCT 

0 

020R 

15331 

oooooo 

WYDT OCT 

0 

0209 

15332 

oooooo 

WZDT OCT 

0 

0210 

15333 

oooooo 

WXPR OCT 

0 

0211 

15334 

oooooo 

HYPR OCT 

0 

0212 

15335 

oooooo 

»ZPR OCT 

0 
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TTCPOCOMP TELECOM HIJNIC AT ED DATA 


DDP-516 ASSEMBLY LISTING 


0213 

15336 

001145 

CRFX 

DEC 

76. 703B12 

0214 

1513 7 

161152 

CP E Y 

DEC 

-946.8B12 

0215 

15340 

001342 

CRFZ 

DEC 

92. 26B12 

0216 

15341 

177205 

SRFX 

DEC 

-47. 405B12 

0217 

15342 

166667 

SPEY 

DEC 

-585. 15B12 

0218 

15343 

000710 

SRFZ 

DEC 

57.02B12 

0219 

15344 

174307 

CP EX 

DEC 

-231. 19B12 

0220 

1 5345 

134003 

CREY 

DEC 

-2303.69B12 

0221 

15346 

135670 

SREX 

DEC 

-142. 88 


15347 

107535 




0222 

15350 

026176 

SREY 

DEC 

1423. 76B12 

0223 

15751 

1 55364 

CRDX 

DEC 

-1 185.55312 

0224 

15352 

153404 

CPDY 

DEC 

-1311. 52B12 

0225 

15153 

000704 

CRD Z 

DEC 

56.609B12 

0226 

15354 

164433 

SRDX 

DEC 

-732.71B12 

0 2 2 7 

15355 

163254 

SPDY 

DEC 

-R10.56B12 

022B 

15356 

177351 

SRDZ 

DEC 

-34. 986B12 

0229 

15157 

140046 

CRCY 

DEC 

-2043.33B12 

0230 

15160 

003230 

CPCZ 

DEC 

21 1. 096B12 

0211 

15361 

023566 

SRC Y 

DEC 

1262. 85B12 

0232 

15362 

002023 

SPCZ 

DEC 

1 30. 464B 1 2 

0231 

1516 3 

013116 

CRB X 

DEC 

731.813B12 

0214 

15164 

002323 

CP BY 

DEC 

154. 49 B 1 2 

0239 

1 5165 

007042 

SRBX 

DEC 

452. 29B12 

0236 

1 5366 

176405 

SRBY 

DEC 

-95. 48B12 

0237 


000414 

wx 

EQO 

1 414 

0238 


000416 

VY 

FOR 

» 416 

0217 


000420 

W7 

BOTJ 

•420 

0240 




END 
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PROGRAM NAME: 

SOURCE: BTVR 
BINARY: BBBOT 

ENTRY POINTS (LOCATION): BBOT (46630) 

GENERAL DESCRIPTION: 

The subroutine BBOT is used for test purposes only. It will 
initiate gyro/accelerometer failures at specified times during the test 
run. Constant bias, ramp and various failures are all simulated by 
mis compensating the specified gyros and/or accelerometers. Prior 
to the start of the test run the gyro to be failed, the time of failure and 
the amount of mis compensation are loaded manually. Up to four instru- 
ments ( 2 gyros and 2 accelerometers) may be failed during one test 
run. 
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NTCRCCOMP TELECOM MO NIC AT ED DATA 
DDP-516 ASSEMBLY LISTING 


0001 




ABS 


0002 




SO BR 

BBOT 

0003 




ORG 

'16630 

0004 

16630 

0 000000 

BBOT 

DAC 

** 

ooos 

16631 

000007 


DBL 


0006 

16632 

0 02 00776 


DLD 

•776 

0007 

16633 

0 07 16742 


DSB 

TFR1 

0000 

16634 

100400 


SPL 


0C09 

16635 

0 01 16644 


JHP 

TRFA 

0010 

16636 

0 02 16754 


DLD 

THIN 

0011 

16637 

0 06 16742 


DAD 

TFR1 

0012 

16640 

0 04 16742 


DST 

TFR 1 

0013 

16641 

0 02 16746 


DLD 

FRP1 

0014 

16642 

0 06 00520 


DAD 

•520 

0016 

16643 

0 04 00520 


DST 

•520 

0016 

16644 

0 02 00766 

TRFA 

DLD 

*766 

0017 

166 45 

0 07 16744 


DSB 

TFR2 

ooie 

16646 

100400 


SPL 


0019 

16647 

0 01 16656 


JMP 

TRFB 

0020 

16650 

0 02 16754 


DLD 

THIN 

0021 

16651 

0 06 16744 


DAD 

TFR2 

0022 

16652 

0 04 16744 


DST 

TFR 2 

0023 

16653 

0 02 16750 


DLD 

FRP2 

0024 

16654 

0 06 00524 


DAD 

*524 

0025 

16655 

0 04 00524 


DST 

' 524 

0026 

16656 

0 02 00776 

TRF5 

DLD 

•776 

0027 

16657 

0 07 16732 


DSB 

TFFB 

0028 

16660 

100040 


SEE 


0029 

16661 

0 01 16670 


JMP 

TRFS 

0030 

16662 

000201 


IAB 


0031 

16663 

100040 


SZE 


003? 

16664 

0 01 16670 


JMP 

TRFS 

0093 

16665 

0 02 16736 


DLD 

FBBT 

0034 

16666 

0 06 00514 


DAD 

•514 

0035 

16667 

0 04 00514 


DST 

•514 

0036 

16670 

0 02 00776 

TPFS 

DLD 

*776 

00 37 

16671 

0 07 16734 


DSB 

TFSB 

0038 

16672 

100040 


SZE 


0039 

16673 

0 01 16702 


JMP 

RTUR 

0040 

16674 

000201 


IAB 


0041 

166 75 

100040 


SZE 


0042 

16676 

0 01 16702 


JMP 

RTOR 

0043 

16677 

0 02 16740 


DLD 

SBBT 

0044 

16700 

0 06 00516 


DAD 

•516 

0045 

16701 

0 04 00516 


DST 

• 516 

0046 

16702 

0 02 00776 

RTOR 

DLD 

•776 

0047 

16703 

0 07 16752 


DSB 

TFVR 

0048 

16704 

100400 


SPL 


0049 

16705 

0 01 16725 


JMP 

RTRA 

0050 

16706 

0 02 16754 


DLD 

THIN 

0051 

16707 

0 06 16752 


DAD 

TFVR 

0052 

16710 

0 04 16752 


DST 

TFVR 

0053 

16711 

000005 


SGL 


0054 

16712 

-0 02 16762 


LDA* 

YRAD 

0055 

16713 

0 16 16763 


MPY 

MTOB 

0056 

16714 

0401 55 


LRS 

19 

0057 

16715 

000007 


DBL 
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MICHOCOMP TELECOM HON IC AT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0058 

16716 

0 04 16756 


DST 

NVAB 

0059 

16717 

0 07 16760 


DSB 

OVAR 

0060 

16720 

0 06 00526 


DAD 

'526 

0061 

16721 

0 04 00526 


DST 

' 526 

0062 

16722 

0 02 16756 


DLD 

NV AH 

0063 

16723 

0 04 16760 


DST 

OVAF 

0064 

16724 

0 12 16762 


IRS 

VPAD 

0066 

16725 

000005 

RTRA 

SGL 


0066 

16726 

-0 01 16630 


JMP* 

BBOT 

0067 

16730 

000000 


DBP 

0 


16731 

000000 




0069 

16732 

oooono 

TFFB 

OCT 

0,0 


16733 

000000 




0069 

16734 

000000 

TFSB 

OCT 

0,0 


16735 

000000 




0070 

16736 

oooooo 

FBRT 

OCT 

0,0 


16737 

000000 




0071 

16740 

oooooo 

SBBT 

OCT 

0,0 


16741 

oooooo 




0072 

16742 

oooooo 

TFB1 

OCT 

0,0 


1674? 

oooooo 




0073 

16744 

oooooo 

TFF2 

OCT 

o 

> 

o 


16745 

oooooo 




0074 

16746 

oooooo 

FFP1 

OCT 

0,0 


16747 

oooooo 




0075 

16750 

oooooo 

FFP2 

OCT 

0,0 


16751 

oooooo 




0076 

16752 

077777 

TFVR 

OCT 

77777,77777 


16753 

077777 




0077 

16754 

oooooo 

TWIN 

OCT 

0,27340 


16755 

027340 




0079 

16756 

OOOOOO 

N VAR 

DBP 

0 


16757 

OOOOOO 




0079 

16760 

OOOOOO 

OVAF 

DBP 

0 


16761 

OOOOOO 




0080 

16762 

0 016764 

VRAD 

DAC 

VAR 

0081 

16763 

071146 

MTOB 

DEC 

28. 6B5 

0082 

16764 

162542 

VAR 

DEC 

-6.655B5 

0083 

16765 

006166 


DEC 

3. 116B5 

0084 

16766 

177735 


DEC 

-• 035B5 

0086 

16767 

174434 


DEC 

-1.723B5 

0086 

16770 

007231 


DEC 

3.650B5 

0087 

16771 

173157 


DEC 

-2. 392B5 

0088 

16772 

167166 


DEC 

-4.385B5 

0089 

16773 

002646 


DEC 

1. 41 3B5 

0090 

16774 

161243 


DEC 

“7.341 B5 

0091 

16775 

015620 


DEC 

6. R91B5 

0092 

16776 

001446 


DEC 

, 780B5 

0093 

16777 

174366 


DEC 

-1.760B5 

0094 

17000 

172246 


DEC 

-2.838B5 

0098 

1^001 

177612 


DEC 

116B5 

0096 

17C02 

013624 


DEC 

5.895B5 

0097 

1700 3 

175624 


DEC 

*1. 106B5 

0098 

17004 

163735 


DEC 

-6. 035B5 

0099 

17005 

007504 


DEC 

3. 817B5 

0100 

17006 

173003 


DEC 

-2.498B5 

0101 

17007 

006462 


DEC 

3. 299B5 
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1ICRCC0HP TELECOMMUNICATED DATA 



D DP- 

516 ASSEMBLY 

LISTING 


0 102 

17010 

162206 

DEC 

-6. B70E5 

0101 

17011 

023415 

DEC 

9.763B5 

0104 

17012 

150346 

DEC 

-7.776B5 

0105 

17013 

172612 

DEC 

-2. 616B5 

0106 

17014 

011363 

DEC 

4.738B5 

0107 

17015 

162004 

DEC 

-6 , 997B5 

0109 

17016 

005523 

DEC 

2.832B5 

0109 

17017 

161061 

DEC 

-7. 453B5 

0110 

17020 

011003 

DEC 

4.503B5 

0111 

17021 

174424 

DEC 

-1.731B5 

0112 

17022 

002314 

DEC 

1 .200B5 

0113 

17023 

024420 

DEC 

10. 266B5 

0114 

17024 

176721 

DEC 

- . 546B5 

0115 

17025 

155041 

DEC 

-9. 468B5 

0116 

17026 

021010 

DEC 

8.508B5 

0117 

17027 

166567 

DEC 

-4. 634B5 

0119 

17030 

034105 

DEC 

14.068B5 

0119 

17031 

I'M 124 

DEC 

-3. 418B5 

0120 

17032 

176407 

DEC 

744B5 

0121 

17033 

167461 

DEC 

-4. 203B5 

0122 



END 
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Single Pqsition Calibration Load Map 


ATTACH 

OK 

ROYSW 

DEBUG 


GO 


$Z 200 

777 

SD 250 


000250 

$40763 

000000 

00025 1 
$ 

000000 

000252 

$44121 

oooooo' 

000253 

000000 

$D 460 


000460 

$40000 

oooooo 

000461 
$D 463 

oooooo 

000463 

$40000 

oooooo 

000464 
$D 46 7 

oooooo 

000467 

$40000 

oooooo 

000470 
$D 473 

oooooo 

000473 

$40000 

oooooo - 

000474 
$D 477 

oooooo 

000477 

oooooo 

$40000 


000500 

$ 

oooooo 

000501 

ss 

oooooo 

LDRX 23665 1000 64 

GO 

MN 

I BSPM2 
MR 

.OK 


ATTACH 

MCKERN 

OK 

' 

START 23001 

GO 

MR 

C BREAD 

MR 

1— . 


OK 

ATTACH RCYSy 
OK 

START 23001 

GO 

MR 

C 8SPC0 
MR 

C OSPAL 
MR 


OK 

ATTACH MAIN 
OK 

START 23001 

GO 

MR 

C BGCOh 
MR 

C BA COM 
MR 

C BVACU 
MR 

C BSPUN 
MR 

C 6AA6S 
MR 


C 8 VESP 
MR 

C 3DC0A 
MR 

C BDCMT 
MR 

C BERC6 
MR 

C BENIN 
MR 

C BGM1N 
MR 

C BUPMA 
MR 

C 5FP0UT 
MR 

c axou 

MR 

C BDGS 

• MR 

C FTLIBY 
MR 

C 8NG63 
MR 

. C BMV63 
MR 


® 
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© 

i 

OK ‘ 

ATTACH ROYSW 
OK 

START 23001 
GO 

MR • 

C BPEP4 

LC 

h 


♦START 

01000 

♦HIGH 

11500 

♦NAMES 

17110 

♦COMN 

23777 

♦ BASE 

00223 

LIST 

0000 1 

RUPT 

01346 

ASCT 

01404 

1C I NIT 

01606 

INPIP 

01661 

INGYRO 

01714 

OUTPUT 

02020 

DODSP 

02070 

FALN 

02242 

VPAE 

02556 

VP AS 

02560 

VPBE 

02562 

VPBS 

02 64 

VPRD 

02566 

ZAZT 

02576 

SDVE 

026 10 

SDVS 

026 12 

DADX 

02614 

DA EY 

026 16 

DASZ 

02620 

GCOM 

02626 

ACOM 

03312 

VAC U 

03514 

SPUN 

03566 

ATTA 

04046 

VELA 

04474 

FXX 

05142 

FXY 

05 144 

FXZ 

05 146 

FYX 

05150 

fyy 

05 152 

fyz 

05154 

FZX 

05156 

fzy 

05160 

FZZ 

05162 

DCOA 

05214 

AOAP 

05322 


L 


BOAP 

05324 

COAP 

05326 

DOAP ‘ 

05330 

EOAP 

05332 

FOAP 

05334 

DCMI 

05344 

DCMT 

05417 

ERCO 

05532 

EMIN 

05640 

GMIN 

05704 

MATR 

05 750 

GMAT' 

06004 

FPOUTC 

06476 

OUT 100 

06710 

IOMODE 

06742 

XI ou 

06774 

XNOU 

07000 

XNOUA 

07004 

XOOCT 

07010 

DGSWRT 

07026 

DGSRD . 

07067 

CNOU 

07174 

CNOUA 

0720 1 

COOCT 

07254 

C10U 

073 10 

DOPAGE 

07502 

CRTOUT 

10002 

CRTQUA 

10010 

SQRTX 

10120 

F$AT 

10 120 

ARG$ 

10202 

T1 OU 

1C253 

TNOUA 

1C27S 

TNOU 

10303 

TOOCT 

10353 

MG63 

10406 

MP63 

10602 

VCMP 

10730 

DZNC 

1 1030 

D1 

1 1 ICO 

D2 

1 1 102 

D3 

11104 

D4 

1 1 106 

GDAC 

1 1 123 

LGDC 

LC 

11237 

23777 

OK 

SAVE RSPM2 64 1 1500 1000 
OK 
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PROGRAM NAME 
SOURCE: SPM2 
BINARY: BSFM2 

ENTRY POINTS (LOCATION): This is the main controlling program for 
the single position calibration and starts in 1000 
GENERAL DESCRIPTION: 

' This program controls the calls to the subroutines which perform 
the single position calibration and is similar to the main program used in 
SIRU Development. There is an initialization section ending with a call to 
ICINIT which sets up the interrupt and flows into LOOP which outputs the 
system data periodically and also gets interrupted periodically to update 
the accelerometers or gyros by branching to either PDO or GDO. 

The accelerometer update consists of reading the accelerometers 
(INPIP), compensating them (ACOM) doing the 6x3 matrix multiplication 
(EMIN, MP63) normalizing the quaternion (SPUN) transforming the bodyAV 
into the inertial frame (VELA) accumulating inertial AV (VACV) and finally 
once every hundred times (once a second) doing the fine alignment (FALN). 
From the listing it can be seen that when the counter NCON reaches 0 it gets 
reset to -100, theAV East and South (in locations 450 and '454) are transferred 
to SDVE and SDVS) in the fine alignment program and FALN is called. If it is 
twenty minutes or more from initialization, the fine alignment program will call 
DZNC (see source programs SPAL and PEP4) which filters the vertical axis 
drift. Finally, the AV accumulators are zeroed to start accumulation for the 
next second. 

The gyro update consists of reading the gyros (INGYRO), compensating 
the gyros (DCMT , GCOM), doing the 6x3 matrix multiplication (GMIN, MG63) 
doing earth rate compensation (ERCO), adding the fine align commands (DADX, 
DAEY and DASZ) into A6 body ( 414, / 4tl6 and y 420), doing the attitude algor- 
ithm (ATTA) and if it is twenty minutes or more from run initialization, 
doing the single position calibration (GDAC, program source name PEP4). 

When it is time to output, the appropriate variables are saved in the 
buffer QTMP and a call to OUTPUT is made (see program SPCO). 


278 



MICPOCOMP telecommunicated data 


DDP-516 ASSEMBLY LISTING 


0001 




RFL 


0002 

0 0 0 0 G 

0 10 

OCOOO 

CALL 

DC M I 

0003 

OOOC1 

000007 

DBL 


0004 

00002 

0 02 

00 2 36 

DLD 

nzno 

0005 

0000 3 

0 3 5 

OC 6 0 4 

LDX 

= -9 8 

0 006 

00004 

1 04 

00 4 22 

DST 

• 422 , 1 

0007 

0 0 0 C 5 

0 12 

00000 

IBS 

C 

00 OB 

00006 

0 12 

00 000 

IBS 

C 

0009 

00007 

C 01 

00004 

onp 

*- 3 

0010 

000 10 

0 35 

006 03 

LDX 

= -24 

001 1 

000 1 1 

1 0 4 

00460 

DS’’ 1 

• 460,1 

0012 

000 12 

0 12 

OCOOO 

IBS 

0 

0013 

0 00 1 3 

0 12 

ooocc 

IRS 

0 

00 14 

000 14 

0 01 

0C011 

JMP 

*- 3 

OC 1 5 

0 0 C 1 5 

0 35 

00 602 

LDX 

= -68 

0016 

00016 

1 04 

OC 790 

DST 

•700,1 

0017 

COO 17 

0 12 

ore oo 

IBS 

0 

0 018 

00 C 20 

0 12 

ocooc 

IBS 

c 

0019 

0002 1 

0 01 

000 16 

JMP 

*- 3 

0020 

00C22 

0 35 

0C601 

LDX 

= -28 

0021 

0 0023 

1 04 

01000 

DST 

• 1009,1 

002 2 

000 24 

C 12 

OCOOC 

IBS 

0 

0023 

0 0 0 25 

C 12 

OCOOO 

IBS 

0 

00 2 4 

0 0026 

0 P.1 

00023 

JMP 

*- 3 

0025 

00027 

-C C4 

90223 

DST* 

PAD A 

0026 

00030 

-0 04 

002 24 

DST* 

PAGE 

0027 

0003 1 

-0 0 4 

90225 

DST* 

PAOC 

00 28 

0 CO 32 

-0 04 

OC 226 

DST* 

PAOD 

0029 

0C0.3 3 

-0 04 

90227 

DST* 

P AO E 

0 03 0 

000 34 

-0 94 

002 30 

DST* 

PA OP 

0031 

COO 35 

000005 

SGL 


0032 

00036 

0 04 

00405 

STA 

DSCT 

0 0 3 3 

0003T 

0 04 

00 404 

ST A 

ASCT 

0 c 3 4 

C004G 

0 04 

004 06 

STA 

MSCT 

0035 

00041 

0 04 

00407 

STA 

ICNT 

0036 

00C42 

0 02 

9C60C 

LDA 

=•77777 

0037 

00043 

0 04 

C 0 56 1 

STA 

TCNT 

0038 

00044 

0 02 

00577 

LDA 

= • 4000 0 

0039 

00045 

0 04 

or 401 

STA 

*401 

0040 

00046 

0 04 

0040 3 

STA 

• 40 3 

0041 

00047 

0 04 

00405 

STA 

• 405 

0042 

00050 

C 04 

00407 

STA 

' 407 

0043 

0005 1 

0 04 

0041 1 

STA 

• 4 1 1 

0044 

COO 52 

C 04 

004 13 

STA 

• 41 3 

0045 

COOS 3 

0 94 

00601 

STA 

* 601 

0046 

000 54 

0 04 

00603 

STA 

*603 

0 04 7 

G0C55 

C 04 

00 605 

STA 

*695 

00 48 

C0056 

0 04 

00607 

STA 

•6 07 

004 9 

00057 

0 04 

OC 6 1 1 

STA 

• 6 1 1 

COSO 

C 0 0 6 0 

C 04 

00613 

STA 

•M3 

0051 

0 OC 6 1 

0 04 

0 C 4 1 5 

STA 

• 4 1 5 

C 052 

C0C62 

0 04 

004 17 

STA 

•4 17 

0053 

C 0 0 6 3 

0 04 

OC 4 2 1 

STA 

* 421 

0054 

00064 

0 04 

00615 

STA 

•615 

CC55 

00065 

0 04 

00617 

STA 

•6 17 

0 056 

C 0066 

0 04 

00621 

STA 

•621 

0057 



* 

STA 

•4 60 
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MICROCOMP TELECOMMUNICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0058 



♦ 

STA 

*463 

0054 



* 

STA 

'467 

0060 



* 

STA 

* 473 

CC61 



* 

STA 

* 4 77 

0C62 

C0C67 

0 C 4 00447 


STA 

■ 447 

0 061 

00070 

0 04 0C453 


STA 

•453 

0 06U 

0007 1 

0 04 00457 


STA 

•457 

0065 

00072 

0 10 00 000 


CALL 

GMT N 

0066 

00073 

0 10 OCCOC 


CALL 

EMIN 

0067 

00074 

0 02 OC 222 


L DA 

RDAD 

0C68 

00075 

0 04 00 C 63 


STA 

• 6 3 

0 069 

00 076 

0 10 OCOOO 


CALL 

IC I NIT 

0070 

00077 

0 02 00576 


LDA 

= 6 

0071 

00100 

74 002C • 


SMK 

•20 

0072 

00101 

G 10 00207 


.1ST 

GETM 

0073 



* 



0074 



* 



0075 

00102 

000401 

LOOP 

END 


0076 

00103 

0 C 2 00561 


LDA 

TCNT 

0077 

C0104 

0 11 OC 557 


CAS 

CPTT 

0 078 

00105 

101000 


NOP 


00 79 

0 0 1C 6 

0 01 00122 


JMP 

OUT 

C 080 

00107 

000201 


TAB 


0081 

00110 

101QC2 


SS4 


OCR 2 

001 1 1 

0 01 OC 1 02 


JMP 

LOOP 

008 3 

C01 12 

100004 


SR 3 


008 4 

00113 

0 01 0 C 10 2 


JMP 

LOOP 

CO 86 



* 



0^R6 



* EXIT CODING 

0087 



* 



C 089 

0 0114 

14 0047 


OCP 

1 47 

G089 

00115 

14 0057 


OCP 

*57 

0090 

00 116 

140040 


CRA 


C 0 9 T 

00 117 

74 002C 


SMK 

• 20 

0092 

00120 

0010C1 


INH 


0093 

0 0121 

-0 01 0C553 


JMP 1 *' 

DOS 

0094 



* 



0095 



* 



0096 

00122 

100004 

OUT 

SR3 


0097 

C 0 1 2 3 

101002 


SS4 


C 099 

00124 

0 01 OC 1 46 


JMP 

NOQZ 

0099 

C 0 1 25 

000007 


DDL 


0100 

00126 

C 02 0C236 


DLD 

DZRO 

oici 

CO 127 

0 C 4 QC46C 


DST 

*460 

0102 

00130 

0 04 00462 


DST 

• 462 

0103 

00 13 1 

0 04 0C464 


DST 

• 464 

0104 

00 132 

0 04 00466 


DST 

• 466 

0105 

00133 

0 04 0C470 


DST 

•470 

0106 

00134 

0 04 00472 


DST 

• 472 

01C7 

00 135 

0 04 00474 


DST 

•474 

0108 

00136 

0 04 00476 


DST 

• 476 

0109 

00137 

000005 


SGL 


Oil 0 

00140 

0 02 00577 


LDA 

=• 40000 

0111 

00141 

0 04 00460 


STA 

•460 

0112 

00142 

0 04 00463 


STA 

• 463 

0113 

00143 

0 04 00467 


STA 

•467 

0114 

00144 

0 04 00473 


STA 

• 47 3 


TO SET UP TIME 
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MTCROCOMP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0115 

00 145 

0 

04 

00477 


STA 

• 477 

0116 

00146 

000007 

NOQZ 

DBL 


0117 

00147 

0 

02 

0046C 


DLD 

*460 

0118 

00150 

0 

C 4 

0G244 


DST 

QTMP 

0119 

00151 

0 

02 

00464 


DLD 

•464 

0120 

00152 

0 

04 

00246 


DST 

QTMP+2 

0121 

00153 

0 

02 

004 70 


DLD 

*470 

0122 

C 0 1 54 

0 

04 

OC 250 


DST 

QTMP * 4 

0123 

00155 

0 

02 

00474 


DLD 

*474 

0124 

00156 

0 

04 

OC 252 


DST 

QTMP+6 

0125 

00157 

- 0 

02 

0C 231 


DLD* 

D 1 

0126 

00160 

04 

11 

74 


LLS 

4 

0 127 

00161 

0 

04 

00254 


DST 

QTMP+8 

0128 

00162 

- 0 

02 

00232 


DLD* 

D2 

0129 

00163 

04 

11 

74 


LLS 

4 

0130 

00164 

0 

04 

00256 


DST 

QTHP+1' 

0131 

00165 

-0 

02 

OC 2 33 


DLD* 

D 3 

0132 

00166 

04 

11 

74 


LLS 

4 

0133 

00167 

0 

04 

00260 


DST 

qtmp+i: 

0134 

00170 

-0 

02 

00234 


DLD* 

D4 

0135 

00 171 

04 

11 

74 


LLS 

4 

0136 

00172 

0 

04 

00262 


DST 

QTMP+1 

0137 

00173 

0 

02 

00 776 


DLD 

TIME 

0138 

00174 

0 

04 

0C264 


DST 

QTMP+1 

0139 

CO 175 

0 

02 

00236 


DLD 

DZRO 

0140 





* 

DST 

*444 

0141 





* 

DST 

*450 

0142 





* 

DST 

*454 

0143 

00176 

000005 


SGL 


0144 

00177 

0 

04 

00561 


STA 

TCNT 

0145 

00200 

0 

10 

00 207 


J ST 

GETM 

0146 

00201 

0 0 0 0 C 5 


SGL 


0147 

00202 

0 

10 

00000 


CALL 

OUTPUT 

0148 

00203 

0 

000244 


DAC 

QTMP 

0149 

00204 

0 

000560 


DAC 

MODE 

0150 

00205 

000000 


OCT 

0 

0151 

00206 

0 

01 

00102 


JMP 

LOOP 

0152 





* 



0153 

00207 

0 

oocooo 

GETM 

DAC 

** 

0154 

00210 

140040 


CRA 


0155 

0021 1 

100020 


SRI 


0156 

00212 

14 1206 


AOA 


0157 

00213 

1000 

10 


SR2 


0158 

00214 

0 

02 

0C575 


LDA 

= 2 

0159 

00215 

0 

04 

00560 


STA 

MODE 

0160 





* 



0161 

00216 

0 

04 

OCOOO 


STA 

0 

0162 

00217 

1 

02 

00 554 


LDA 

TCON , 1 

0163 

00220 

0 

04 

OC 557 


STA 

CRIT 

0164 

00221 

-0 

01 

00207 


JMP* 

GETM 

0165 





* 



0166 

00222 

0 

oooooc • 

ROAD 

X AC 

RUPT 

0167 

00223 

0 

oocooo 

PAOA 

XAC 

AOAP 

0168 

00224 

0 

000000 

PAOB 

X AC 

BOAP 

0169 

00225 

0 

000000 

PAOC 

XAC 

COAP 

0170 

00226 

0 

000000 

PAOD 

XAC 

DOAP 

0171 

00227 

0 

000000 

PAOE 

XAC 

EOAP 


MODE 
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MICROCO £ P TELECOMMUNICATED DA'i’A 



DDP- 

516 ASSEMBLY 

0172 

00230 

0 000000 

0171 

00231 

0 000000 

0174 

00232 

0 cocooc 

om 

00233 

0 000000 

0176 

00234 

0 00CQC0 

0177 

C0236 

000000 


00237 

000000 

0178 

00240 

000000 


00241 

000001 

0179 

00242 

000003 


00243 

052300 

0180 

00244 

000000 


CO 245 

GCOOOO* 


00246 

000000 


00247 

000000 


00250 

000000 


00251 

000000 


00 252 

000000 


00253 

000000 


00254 

000000 


00255 

ooocco 


0 C 2 5 6 

ooooco 


C G 257 

0 0 0 0 0 0 


00260 

000000 


C 0 26 1 

000000 


00262 

oooooo 


00263 

000000 


00264 

ooooco 


00265 

oooooo 


00266 

oooooo 


00267 

oooooo 


00270 

oooooo 


00271 

oooooo 


00272 

oooooo 


00273 

oooooo 


00274 

oooooo 


00275 

ooocoo 


00276 

oooooo 


00277 

oooooo 


00 300 

oooooo 


00301 

oooooo 


G 0 302 

oooooo 


00 303 

oooooo 


00304 

oooooo 


00305 

oooooo 


0 0 3 C 6 

oooooo 


003C7 

oooooo 


00 3 1C 

ooooco 


00311 

oooooo 


00312 

oooooo 


00313 

oooooo 


00314 

oooooo 


00315 

oooooo 


00316 

oooooo 


00317 

oooooo 


00 320 

oooooo 


00321 

oooooo 


LISTING 
PAOF X AC 

FOAP 

D1 

X AC 

D 1 

D2 

X AC 

D2 

D3 

XAC 

D3 

D4 

X AC 

DU 

DZRO 

DBP 

0 

DONE 

OCT 

CM 

TWMN 

DEC 

120000BB30 

QTMP 

BSZ 

52 
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MICROCOMP TELECOMMUNICATED DATA 



DDP- 

516 ASSEMBLY LISTING 



00322 

000000 





00323 

000000 





00324 

000000 





00 325 

000000 





00326 

000000 





00327 

000000 




0181 

C0330 

000000 

PISE BSZ 

14 


00 331 

000000 





00332 

000000 





00333 

000000 





00334 

000000 





00 3 35 

000000 





00336 

ooocoo 





00 337 

cocooo 





00340 

OOGOOO 





00341 

000000 





00342 

000000 





CO 34 3 

ooccco 





00344 

000000 





00 345 

GCG000 




0182 



* 



0183 



★ 



0184 




SUBP 

BUPT 

0185 




SUBS 

A SCT 

0186 




REL 


0187 

00346 

0 ooooco 

RUPT 

DAC 

** 

0188 

0 0 3 4 7 

14 0102 


OCP 

• 102 

0189 

00350 

34 0507 


SKS 

*507 

0190 

00351 

0 01 0C41C 


JMP 

PDO 

0191 

00352 

34 0407 


SKS 

•407 

0192 

00353 

0 01 OC 464 


JMP 

GDO 

0 19 3 

00 354 

34 0607 


SKS 

*607 

0194 

00355 

0 01 00377 


JMP 

ICLK 

0195 

0 0 356 

34 04 25 


SKS 

*425 

0 1 q 6 

00357 

0 01 OC 373 


JMP 

DISK 

0 197 

G 0 360 

34 0404 


SKS 

*404 

0199 

00361 

0 01 00365 


JMP 

ASP 

0199 

00362 

0 12 00406 


IRS 

MSCT 

02C0 

00363 

00C401 

RSM 

ENB 


0201 

0 0 364 

-0 01 OC 34 6 


JMP* 

BUPT 

0202 



* 



C 20 3 

00365 

14 0004 

ASR 

OCP 

4 

0204 

00 366 

54 0004 


INA 

4 

0205 

00.367 

101000 


NOP 


0206 

00370 

0 12 OC 404 


IBS 

AS CT 

0207 

00371 

101030 


NOP 


0208 

00372 

0 01 00363 


JMP 

RSM 

0 20 9 



* 



0210 

00373 

14 1425 

DISK 

OCP 

* 1425 

0211 

00374 

0 12 0C405 


IRS 

DSCT 

0212 

00375 

101000 


NOP 


0213 

00376 

0 01 00363 


JMP 

RSM 

0214 



* 



0215 

00377 

0 12 00407 

ICLK 

IBS 

IC NT 

0216 

00400 

101000 


NOP 


0217 

00401 

14 0027 


OCP 

*27 

0218 

C0402 

14 OC 67 


OCP 

*67 


SHUT OFF DGS 


DISK BUPT 

ASP BUPT 
MISCELLANEOUS 


DUMMPY 


IN CASE OF SKIP 


IN CASE OF SKIP 
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MICROCOMP TELECOMMUNICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0219 

00403 

0 01 00363 


JHP 

RSM- 

0220 

C 0 404 

000000 

ASCT 

BSZ . 

1 

0221 

00405 

000000 

DSCT 

BSZ 

1 

02 22 

00406 

000000 

MSCT 

BSZ 

1 

022 3 

00407 

000000 

ICNT 

BSZ 

1 

022 a 



* 



0225 



* 



0226 

00410 

0 13 00 562 

PDO 

IMA 

AREG 

0227 

0041 1 

000043 


INK 


0228 

00412 

000005 


SGL 


0229 

00413 

0 04 00563 


ST A 

KEYS 

0230 

004 14 

000201 


IAB 


0231 

00415 

0 04 00564 


ST A 

BREG 

0232 

00416 

0 15 00565 


STX 

XR EG 

0 233 



* 



0234 



* 



0235 



* 



0236 



* 



0237 

00417 

0 10 OOOOC 


CALL 

INPIP 

0238 

00420 

000401 


ENB 


0239 

00421 

0 10 OCOOO 


CALL 

ACOM 

0 24 0 

00422 

0 10 00000 


CALL 

EMIN 

0241 

00423 

0 10 oocoo 


CALL 

MP63 

0242 

00424 

0 10 00000 


CALL 

SPUN 

0243 

00425 

0 10 oocoo 


CALL 

VELA 

024 4 

00426 

0 10 COCQO 


CALL 

VACU 

0245 

00427 

0 12 00566 


IRS 

NCON 

0246 

00430 

0 Cl 00452 


JHP 

NOAL 

0247 

0043 1 

0 02 00574 


LDA 

= -100 

0248 

00432 

0 04 00566 


STA 

NCON 

0249 

00433 

000007 


DBL 


0250 

C 04 34 

0 02 00450 


DLD 

*450 

0251 

00435 

0411 62 


LLS 

14 

0252 

0 04 36 

-0 04 00572 


DST* 

SDVE 

0253 

00437 

0 02 00454 


DLD 

t 454' 

0 254 

00440 

0411 62 


LLS 

14 

0255 

00441 

-0 04 00573 


DST* 

SDVS 

0256 

0 0442 

000005 


SGL 


0257 

00443 

0 10 00000 


CALL 

FALN 

0258 

00444 

000007 


DBL 


0259 

00445 

0 02 00236 


DLD 

DZP.O 

0260 

00446 

0 04 00444 


DST 

*444 

0261 

CO 447 

0 04 00450 


DST 

*450 

0262 

CO 450 

0 04 00454 


DST 

*454 

0263 

00451 

000005 


SGL 


0264 

00452 

. 000007 

NOAL 

DBL 


0265 

00453 

000005 


SGL 


0266 



★ 



0267 



* 



0268 

00454 

0 35 00565 

COMN 

LDX 

XREG 

0269 

00455 

0 02 OC 564 


LDA 

BREG 

0 270 

00456 

000201 


IAB 


0271 

00457 

0 02 00563 


LDA 

KEYS 

0272 

00460 

171020 


OTK 


0273 

C0461 

0 13 00562 


IMA 

APEG 

0274 

00462 

000401 


ENB 


0275 

00463 

-0 01 00346 


JHP* 

RUPT 
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MICROCOMP TELECOMMUNICATED DATA 



DDP- 

•516 ASSEMBLY 

LISTING 


0276 



* 



0277 



* 



0278 

00464 

0 13 00562 

GDO 

IMA 

AREG 

0279 

00465 

000043 


INK 


0280 

00466 

000005 


SGL 


0281 

00467 

0 04 0C563 


STA 

KEYS 

0282 

00470 

000201 


I A B 


0283 

00471 

0 04 00564 


STA 

BREG 

0284 

00472 

0 15 00565 


ST X 

XREG 

0285 



* 



0286 



* 



0287 

00473 

34 OC 07 


SKS 

' C 0 7 

0288 

00474 

0 01 00473 


JMP 

*- 1 

02B q 

00475 

14 0406 


OCP 

* 40 6 

0290 

00476 

0401 62 


LRS 

14 

0291 

00477 

54 1016 


INA 

* 1018 

0292 

00500 

101000 


NOP 


0293 

00501 

0 04 0C324 


STA 

*324 

0294 

00 502 

54 1006 


INA 

* 1C06 

0295 

0 050 3 

101000 


NOP 


0296 

00504 

0 04 00325 


STA 

• 325 

0297 

0 0505 

14 0006 


OCP 

'006 

0298 

00506 

0 10 00000 


CALL 

INGYRO 

0299 

00507 

300401 


ENB 


0300 

00510 

C 10 OOOOC 


CALL 

DC MT 

0301 

0051 1 

0 10 occoo 


CALL 

GCOM 

0302 

00512 

0 10 00000 


CALL 

GM IN 

0 3 03 

00513 

0 10 oocoo 


CALL 

MG 6 3 

0304 

00514 

0 10 00000 


CALL 

ERCO 

0305 

0051 5 

00 CO C 7 


DPI. 


0 306 

005 16 

-0 02 0C567 


DLD* 

DA DX 

0307 

005 17 

C 06 0C414 


DAD 

« 414 

0308 

00520 

0 04 00414 


DST 

'414 

0309 

0052 1 

-C 02 005 70 


DLD* 

DAEY 

0310 

00522 

0 06 0C416 


DAD 

*416 

0311 

005 23 

0 C 4 00416 


DST 

'416 

0312 

00524 

-0 02 0C571 


DLD* 

DASZ 

0313 

00525 

0 06 0C42C 


DAD 

• 420 

0 314 

00526 

0 04 0042C 


DST 

•420 

0315 

00527 

00C0C5 


SGL 


0316 

00530 

0 10 ocooc 


CA LL 

ATTA 

0317 

00531 

0 02 CO 776 


DLD 

* 776 

C 3 18 

00532 

0 G7 0C242 


D SB 

TWMN 

03 19 

0 05 33 

000005 


SGT. 


0320 

00 534 

1 0 1 4 C 0 


SMI 


0321 

00535 

0 10 oocoo 


CALL 

GD AC 

0322 

00536 

000007 


DBL 


0323 

00537 

0 02 00236 


DLD 

DZRO 

0 3 24 

00540 

-0 04 00567 


DST* 

DADX 

0325 

00541 

-0 04 0C57C 


DST* 

DAEY 

0326 

00542 

-0 04 00571 


DST* 

DASZ 

03 27 

00543 

000005 


SGL 


0328 

00544 

0 12 00561 


IRS 

TCNT 

0329 

00545 

000007 


DBL 


0330 

00546 

0 02 00776 


DLD 

TIME 

0331 

00547 

0 06 00240 


DAD 

DONE 

0332 

00550 

0 04 00776 


DST 

TIME 


WAIT FOR DIO IS EC 
HOLD 

WAIT 8 MCT * F 
HIGH HALF 


LOW HALF 


END HOI D 
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MICROCOMP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


0333 

00551 

000005 


SGL 

0334 



* 


03 35 



* 


0 3 36 

00552 

0 01 00454 


J MP 

0337 



* 


0 3 38 



& 


0333 



* 


0 340 

00553 

C3C000 

DOS 

OCT 

0341 

00554 

013560 

TCON 

DEC 

0 342 

00555 

000620 


DEC 

0343 

00556 

000144 


DEC 

0344 



* 


0 345 

00557 

OOOOCO 

CRIT 

BSZ 

0346 

00560 

000000 

MODE 

BSZ 

0347 

00561 

077777 

TCNT 

OCT 

0348 

00562 

oooceo 

AREG 

BSZ 

0 349 

00563 

000000 

KEYS 

BSZ 

0 350 

00564 

000000 

BREG 

BSZ 

0351 

00565 

000000 

XREG 

BSZ 

0352 

00566 

177634 

NCON 

OCT 

0 3 53 

00567 

0 000000 

DADX 

X AC 

0 354 

00570 

0 000000 

DAE Y 

XAC 

0355 

00571 

0 cooooo 

DASZ 

X AC 

0 3 56 

00572 

0 000000 

SDVE 

XAC 

0357 

00573 

0 oocooo 

SDVS 

XAC 

0358 


000776 

TIME 

con 

0 359 

C0574 

177634 


END 


00575 

000002 




0 05 76 

000006 




00577 

040000 




0060C 

077777 




00601 

177744 




00602 

177674 




00603 

177750 




00604 

177636 




COMN 


30000 

6000 30 SEC FOB TTY 

400 4 SEC FOR CRT 

ICC .4 SEC FOR DGS 

1 

1 

77777 

1 

1 

1 

1 

177634 
DADX 
DA EY 
DA SZ 
SDVE 
SO VS 
*776 


286 



PROGRAM NAME 
SOURCE: SPCO 

BINARY: B SPCO (note: this is a FORTRAN program) 

ENTRY POINTS (LOCATION): OUTPUT ('2020), DODSP ('2070) 
GENERAL DESCRIPTION: 


This subroutine is called by the main program (SPM2) every minute 
and outputs the quaternion, the filtered vertical axis drifts (Dl, D2, D3 
and D4 from program PEP4) and time in the format shown below, Dl through 
D4 are scaled at 2’^ radians per second. 

At eighty minutes the A, B, C and D gyro drifts are printed out. 

To convert to meru, the printed values must be multiplied by 476.16, 


GUAT 

0.999999 

- 

0.000418 

0.000010 

- 

G.U00007 

01234 

0 ,000 1 70 

- 

0.000154 - 

U. 000 154 

- 

0,000154 

I IME 

4500.00 






QUAT 

0.999999 

- 

0.000402 

0 » 00 0C 1 4 

- 

0.O00U07 

D 1234 

0.000123 

- 

0,000154 - 

0.000154 

- 

0 . 000 1 5 4 

TIME 

4560.00 






GUAT 

0.999999 

- 

0.000299 

0.000019 


O.UOOOU3 

01234 

0.000153 

- 

0.000153 - 

0.000153 

- 

0 . 000 1 53 

TIME 

4620.00 






GUAT 

0.999999 

- 

0.000310 

0,0000 IS 

- 

0.00000 1 

01234 

0.000148 

- 

0.000153 - 

0.000153 

- 

0 • 0C0 153 

TIME 

4680. 00 






QUAT 

0.999999 

- 

0.000357 

0.00001 1 

- 

u • uOOCO 1 

Dl 234 

0.000137 

- 

0.000153 - 

0.000153 

- 

0.000153 


TIME 4740*00 

Q- G.0Q22S733 
0.00066333 
0.00228406 
0,00712491 
OK 
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microcomp telecommunicated data. 

DDP-516 ASSEMBLY LISTING 
SUBROUTINE OUTPUT (ARG, MODE) 
000000 DAC 000000 

000001 CALL FSAT 

000002 OCT 000002 

000003 DAC 000000 

000004 DAC 000000 

INTEGER ARG (18) .MODE, MODSAV 
DATA MODSAV /-I/ 


000005 

JMP 

000000 


000006 

OCT 

177777 


IF (MODE. E0 

,2) GOTO 

100 


STG 

000005 


000007 

LDA* 

MODE 


000010 

SUB 

= * 000002 


00001 1 

S ZE 

000000 


000012 

JMP 

000000 


000013 

JMP 

.100 



STG 

000012 


IF (MODE. EO 

>. MODSAV) 

GOTO 50 

000014 

LDA* 

MODE 


000015 

SUB 

MODSAV 


000016 

SZE 

000000 


000017 

JMP 

000000 


00QC20 

JMP 

.50 



STG 

000017 



CALL TO MODE (MODE) 


000C21 

CALL 

IOMODE 


00CC22 

DAC* 

MODE 



MODSAV-MODB 


000023 

LDA* 

MODE 


000024 

STA 

MODSAV 


50 

CALL DODSP(ARG) 



STG 

.50 


OOOC25 

CALL 

DODSP 


000026 

DAC* 

ARG 



IF (MODSAV, 

EO. 1) CALL C10U (2H 

0 COO 27 

LDA 

MODSAV 


000030 

SUB 

='000001 


000031 

SZE 

000000 


000032 

JMP 

000000 


000033 

CALL 

Clou 


000034 

DAC 

='120336 



STG 

000032 


C 

RETURN 




C DIGISTOR OUTPUT 
C 


0C0035 

JMP* 

oooooo 

100 ' 

CALL DGSWRT (ARG ,18) 


STG 

. 100 

000036 

CALL 

DGSWHT 

000037 

DAC* 

ARG 

000040 

DAC 

='000022 

000C41 

OCT 

RETURN 

oooooo 

000042 

JMP* 

oooooo 


END 
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MICROCOMP TELECOMMUNICATED DATA 
DDP-5 1 6 ASSEMRLY LISTING 
C 
C 

c 



STG 

=•000001 

000043 

OCT 

000001 


STG 

=•000002 

000044 

OCT 

000002 

000003 

DAC 

ARG 

000004 

DAC 

MODE 


STG 

= *000022 

000045 

OCT 

000022 

000C06 

DAC 

MODS AV 

000036 

DAC 

. 100 

000025 

DAC 

. 50 

000000 

DAC 

IOMODE 

000000 

DAC 

DODSP 

ococoo 

DAC 

clou 


STG 

=•120336 

000046 

OCT 

120336 

oocooo 

DAC 

DGSWRT 

SUBROUTINE DODSP(AR 

000000 

DAC 

000000 

000001 

CALL 

F$AT 

000002 

OCT 

C00001 

000003 

DAC 

000000 


COMMON/LIST/ LIST(I) 
LOGICAL LIST 
INTEGER A RG (18) 


CALL XNOUA ( 8HQO AT , 8) 


000004 

JMP 

oooooc 


STG 

000004 

000005 

JMP 

000000 

000006 

OCT 

150725 

000007 

OCT 

140724 

000010 

OCT 

120240 

000011 

OCT 

12024C 


STG 

000005 

000012 

CALL 

XNOUA 

000013 

DAC 

000006 

000014 

DAC 

=*000010 

000015 

OCT 

000000 

DO 1 

0 1=1, 

7,2 

000C16 

L DA 

= * 000C01 

000017 

STA 

I 

CALL 

FPOUTC (ARG (I) 

000020 

LD A 

I 

000021 

ADD 

ARG 

000022 

ADD 

000024 

000023 

JMP 

000025 

000024 

OCT 

177777 

000025 

STA 

T.fMOOO 

000026 

CALL 

FPOUTC 

000027 

DAC* 

T$1000 

000030 

DAC 

=•000001 

000031 

DAC 

=• 000006 

000032 

OCT 

000000 

10 CALL 

XNOUA 

( 2H ,2) 



MICROCOMP TELECOM MUNICH ED DATA 
ODP-516 ASSEMBLY LISTING 


000033 

CALL 

XNOUA 

000034 

DAC 

= • 120240 

000035 

DAC 

= ' 000C02 

000036 

OCT 

C 00000 

000037 

LDA 

I 

000040 

ADD 

= » 000002 

000041 

CAS 

= ' 000007 

000042 

JMP 

00G045 

0 C 0 0 4 3 

JMP 

000017 

000044 

JMP 

000017 

CALL XlOIJ 

(1381 

000045 

CALL 

X10U 

000046 

DAC 

='000212 

CALL XNOt! 

A (8HD1234 

0C0047 

JMP 

000000 

0C 0050 

OCT 

142261 

000051 

OCT 

1 31263 

000052 

OCT 

13224C 

000053 

OCT 

120240 


STG 

000047 

0CCC54 

CALL 

XNOUA 

000055 

DAC 

000050 

OC 00 56 

DAC 

= • OOGC 1C 

000057 

OCT 

000000 

DO 20 1=9 

.15,2 

0C0C60 

LDA 

=‘000011 

000061 

STA 

I 

CALL FPOUTC (ARG (I) , 

000062 

LDA 

I 

000063 

ADD 

ARG 

0 0 C 0 6 4 

ADD 

000066 

CC0065 

JMP 

C 9 O 0 6 7 

000066 

OCT 

177777 

0 HOC 67 

STA 

T $ 1 0 0 C- 

000070 

CALL 

FPOUTC 

000071 

DAC* 

T$10C0 

000072 

DAC 

=' OOOOOC 

000073 

DAC 

=•000006 

0 0 0 C 7 4 

OCT 

000000 

20 

CALL XNOU A ( 2 H ,2) 

000075 

CALL 

XNOUA 

000076 

DAC 

= • 120240 

000077 

DAC 

=' 000002 

000100 

OCT 

000000 

000101 

LDA 

I 

0C0102 

ADD 

='000002 

000103 

CAS 

='000017 

0C0104 

JMP 

000107 

OG0105 

JMP 

000061 

0C0106 

JMP 

000061 


CALL X10U 

(138) 

000107 

CALL 

X10U 

000110 

DAC 

='000212 


CALL XNOUA (RHTIME 

000111 

JMP 

000000 

0C01 12 

OCT 

152311 

000113 

OCT 

146705 
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MICROCOHP TELECOMMUNICATED DATA 


DDP- 

■516 ASSEMBLY LISTING 

000114 

OCT 

120240 

000115 

OCT 

120240 


STG 

000111 

000116 

CALL 

XNOUA 

000117 

DAC 

CO0 1 1 2 

000120 

DAC 

=*000010 

000121 

OCT 

000000 

CALL OUTIOO (A8G (17) ) 

000122 

LDA 

ARG 

000123 

ADD 

000125 

000124 

JMP 

000126 

000125 

OCT 

000020 

000126 

STA 

T$1 000 

000127 

CALL 

OUT 1 00 

000130 

DAC* 

T$ 1000 

CALL X 100(1 38) 

000131 

CALL 

X10U 

000132 

DAC 

='000212 

CALL X100 

(138) 

000133 

CALL 

X10U 

000134 

DAC 

='000212 

RETURN 


000135 

JMP* 

000000 

END 




STG 

='000001 

000136 

OCT 

000001 


STG 

=*000002 

000137 

OCT 

000002 


STG 

- ' 000006 

000140 

OCT 

000006 

000003 

DAC 

ARG 

000000 

DAC 

LIST 

000000 

DAC 

XNOUA 


STG 

='000010 

000141 

OCT 

000010 

000033 

DAC 

.10 


STG 

I 

000142 

OCT 

004640 


STG 

='000007 

000143 

OCT 

000007 

000000 

DAC 

PPOUTC 


STG 

T$1000 

000144 

OCT 

012244 


STG 

= • 120240 

000145 

OCT 

120240 

000000 

DAC 

X10U 


STG 

=*000212 

000146 

OCT 

000212 

000075 

DAC 

.20 


STG 

=•000011 

000147 

OCT 

000011 


STG 

='000017 

000150 

OCT 

000017 


STG 

='000000 

000151 

OCT 

000000 

000000 

to 

DAC 

OUTIOO 
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PROGRAM NAME 
SOURCE: SPAL 
BINARY: BSPAL 

ENTRY POINTS (LOCATION): FALN('2242) 

ACCESSIBLE VARIABLES (LOCATION): VPAE ('2556), VPAS ('2560), 

VPBE ('2562), VPBS ('2564), VPRD (’ 2566), ZAZT ('2576), SDVE ('2610), 

SDVS ('2612), DADX ('2614), DAEY ('2616), DASZ ('2620) 

GENERAL DESCRIPTION: 

The subroutine FALN gets called once a second and calculates the 
commands DADX, DAEY and DASZ which fine align the quaternion to down, 

East and South. It does a time varying filter on SDVE and SDVS (XAV East 
and XAV South given it by the main program) to get MX, MY and MZ, which 
are the Inertial A6 commands. These are then transformed into the body frame 
yielding DADX, DAEY and DASZ. Finally, if it is twenty minutes or more 
from initialization, it will call DZNC, the vertical axis drift filter in the pro- 
gram PEP4. 
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HICROCOMP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0001 





SUBR 

FALN 

0002 





SUBR 

VPAE 

0003 





SOBR 

VPAS 

0004 





SUBR 

VP BE 

0005 





SUBR 

VP BS 

0006 





SUBR 

VPRD 

0007 





SUBR 

ZAZT 

0008 





SUBR 

DA DX 

0009 





SUBR 

DAEY 

0010 





SUBR 

DAS Z 

0011 





SUBR 

SDVE 

0012 





SUBR 

SDVS 

0013 





PEL 


0014 

00000 

0 

OOOOCO 

FALN DAC 

** 

0015 

00001 

0 

02 

00334 

LDA 

ZAZT 

0016 

00002 

0 

07 

00362 

SUB 

=6 0 

0017 

000C3 

101400 

SMI 


0018 

00004 

0 

01 

00065 

JMP 

AF60 

0019 

00005 

OOCCi 

07 

DBL 


0020 

00006 

0 

02 

00 30 2 

DLD 

DEPO 

0021 

00007 

0 

07 

00 314 

DSB 

VPAE 

0G22 

000 10 

0401 

75 

LRS 

3 

0023 

0001 1 

o 

07 

00 314 

DSB 

VPAE 

0024 

00012 

0401 

76 

LRS 

2 

0025 

0001 3 

0 

06 

00314 

DAD 

VPAE 

0026 

00014 

0 

06 

00346 

DAD 

SDVE 

C027 

00015 

c 

04 

00 314 

DST 

VPAE 

C 020 

00016 

0 

C7 

00 320 

DSB 

VP BE 

0029 

00C17 

0 

04 

0C326 

DST 

TEMP 

0030 

00020 

0401 

75 

LRS 

3 

0031 

00021 

0 

06 

00326 

DAD 

TEMP 

C032 

00022 

0401 

77 

LRS 

1 

003 3 

00023 

0 

06 

00320 

DAD 

VP BE 

0034 

00024 

0 

04 

OC 320 

DST 

VPBE 

003 5 

00025 

0 

02 

00302 

DLD 

DBPO 

0036 

00026 

0 

07 

00316 

DSB 

VPAS 

0037 

00027 

0401 

75 

LRS 

3 

0038 

00030 

0 

07 

00316 

DSB 

VPAS 

0039 

0003 1 

0401 

76 

LRS 

2 

0040 

0 0 0 3 2 

0 

06 

00 316 

DAD 

VPAS 

0041 

00033 

0 

C6 

00350 

DAD 

SDVS 

0042 

00034 

0 

04 

00316 

DST 

VPAS 

004.3 

00035 

0 

07 

00322 

DSB 

VP BS 

0044 

000 36 

0 

04 

00326 

DST 

TEMP 

0045 

00 037 

0401 

75 

LRS 

3 

0046 

00040 

0 

06 

00326 

DAD 

TEMP 

0047 

00041 

0401 

77 

LRS 

1 

0048 

00042 

0 

06 

00322 

DAD 

VPBS 

0049 

00043 

0 

04 

00322 

DST 

VPBS 

0050 

00044 

0401 

75 

LRS 

3 

0051 

00045 

0 

07 

00322 

DSB 

VPBS 

0052 

00046 

0401 

74 

LRS 

4 

0053 

00047 

0 

07 

' 00322 

DSB 

VPBS 

0054 

00050 

0411 

75 

LLS 

3 

0055 

00051 

0 

06 

00330 

DAD 

POND 

0056 

00052 

0 

04 

00310 

DST 

MY 

0057 

00053 

0 

02 

00302 

DLD 

DBPO 
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MICROCOMP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


C058 

00054 

0 C7 

00 3 20 

DSB 

VPBE 

0059 

00055 

0401 

75 

IRS 

3 

0060 

00056 

0 06 

0C32C 

DAD 

VPBE 

0061 

C0Q57 

0401 

74 

LBS 

4 

0062 

00060 

0 06 

00 3 2C 

DAD 

VPBE 

006 3 

00061 

0411 

75 

LIS 

3 

0064 

00062 

0 06 

00 3 3C 

DAD 

ROND 

C06 5 

00063 

G 04 

00312 

DST 

MZ 

0066 

00064 

0 01 

00136 

OHP 

BF60 

0067 

00065 

OOOOC7 

AF60 DBL 


0068 

00066 

0 02 

00 314 

DLD 

VPAE 

0069 

00067 

0401 

76 

LRS 

2 

0070 

00070 

0 07 

00314 

DSB 

VPAE 

0071 

00071 

0401 

74 

LRS 

4 

0072 

00072 

0 06 

00314 

DAD 

VPAE 

0073 

0 007 3 

0 06 

00346 

DAD 

SDVE 

0074 

00074 

0 04 

00314 

DST 

VPAE 

0075 

00075 

0 07 

00320 

DSB 

VPBE 

0076 

00076 

0 04 

OC 3 26 

DST 

TEMP 

0077 

00077 

0401 

77 

L PS 

1 

0 078 

0010C 

0 06 

00326 

DAD 

TEMP 

0070 

001C1 

0401 

74 

L PS 

4 

0080 

00102 

0 06 

00 32C 

DAD 

VPBE 

008 1 

CO 1C 3 

0 04 

00320 

DST 

VPBE 

C082 

00104 

0 02 

00316 

DLD 

VPAS 

0083 

CO 1 G 5 

04G 1 

76 

LRS 

2 

0084 

00106 

0 07 

00 316 

DSB 

VPAS 

C 0 8 5 

00107 

0401 

74 

LRS 

4 

0C86 

00110 

0 06 

00316 

DAD 

VPAS 

0 087 

00111 

0 06 

00350 

DAD 

SDVS 

0088 

00 112 

0 04 

90316 

DST 

VPAS 

0089 

0 0113 

0 07 

00322 

DSB 

VPBS 

C090 

CO 114 

0 04 

00326 

DST 

TEMP 

0091 

00115 

0401 

77 

LRS 

1 

0C92 

00116 

0 06 

00326 

DAD 

TEMP 

0093 

00117 

0401 

74 

LRS 

4 

OC 94 

00120 

0 06 

OC 322 

DAD 

VPBS 

CC 95 

00121 

0 04 

90322 

DST 

VPBS 

C 096 

CO 122 

0401 

74 

LRS 

4 

0097 

00123 

0 07 

00322 

DSB 

VPBS 

C098 

00 124 

0 401 

76 

LRS 

2 

0C99 

C 0 1 2 5 

0 06 

00330 

DAD 

ROND 

0100 

00126 

0 C4 

00 3 1C 

DST 

MY 

Old 

00127 

0 02 

00302 

DLD 

DBPO 

0102 

00130 

0 07 

00 320 

DSB 

VPBE 

0 1 C3 

00131 

0 401 

74 

LRS 

4 

0104 

00132 

0 06 

00320 

DAD 

VPBE 

0105 

00133 

0401 

76 

LRS 

2 

0 106 

00 1 34 

0 06 

00330 

DAD 

ROND 

0107 

00135 

0 04 

00312 

DST 

MZ 

0108 

00136 

000905 

BF60 SGL 


0109 

00137 

0 02 

00 3 34 

LDA 

ZAZT 

0110 

00140 

0 07 

00361 

SUB 

= 180 

0111 

00141 

100400 

SPL 


0112 

00142 

0 01 

OC 206 

JMP 

LEVO 

0113 

00143 

0 07 

00 3 60 

SUB 

= 420 

0114 

00 144 

100400 

SPL 
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NICROCOHP TELECOMMUNICATED DATA 



DDP- 

516 

ASSEMBLY 

LISTING 


0115 

00145 

0 

01 

00166 


JMP 

ORAG 

0116 

00146 

000007 


DBL 


0117 

00147 

0 

02 

00322 


DLD 

VPBS 

0118 

00150 

0 

07 

00324 


DSB 

VPRD 

0119 

00151 

0 

04 

00326 


DST 

TEMP 

0120 

00152 

0 401 

76 


LR5 

2 

0121 

00153 

0 

06 

00326 


DAD 

TEMP 

0122 

00154 

0401 

71 


LRS 

7 

0123 

00155 

0 

06 

0C324 


DAD 

VPRD 

0124 

00156 

0 

04 

00324 


DST 

VPRD 

0125 

00157 

0 

02 

00302 


DLD 

DBP0 

0126 

00160 

0 

07 

00324 


DSB 

VPRD 

0127 

00161 

0411 

75 


LLS 

3 

0128 

00162 

0 

07 

00324 


DSB 

VPRD 

0129 

00163 

0 

06 

00330 


DAD 

ROND 

0130 

00164 

0 

04 

00306 


DST 

MX 

0131 

00165 

0 

01 

00207 


JMP 

BFOS 

0132 

00166 

000007 

ORAG 

DBL 


0133 

00167 

0 

02 

00322 


DLD 

VPBS 

0134 

C0 1 70 

0 

07 

00324 


DSB 

VPRD 

0135 

00171 

0 

04 

00326 


DST 

TEMP 

0136 

00172 

040 1 

76 


LRS 

2 

0137 

00173 

0 

06 

00326 


DAD 

TEMP 

0138 

00174 

0401 

73 


LRS 

5 

0139 

00175 

0 

06 

00324 


DAD 

VPRD 

0140 

00 176 

0 

04 

00324 


DST 

VPRD 

0141 

00177 

0 

02 

00302 


DLD 

DBP0 

0142 

00 200 

0 

07 

00324 


DSB 

VPRD 

0143 

00201 

0411 

75 


LLS 

3 

0144 

00202 

0 

07 

00324 


DSB 

VPRD 

0145 

00203 

0411 

77 


LLS 

1 

0146 

00204 

0 

06 

00330 


DAD 

ROND 

0147 

00205 

0 

04 

00306 


DST 

MX 

0148 

00206 

0 

12 

00334 

LEVO 

IRS 

ZAZT 

0149 

00207 

000007 

BFOS 

DBL 


0150 

00210 

0 

02 

00306 


DLD 

MX 

0151 

00211 

140040 


CFA 


0152 

00212 

000201 


IAB 


0153 

00213 

0 

07 

00332 


DSB 

ANRD 

0154 

00214 

-0 

16 

00335 


MPY* 

CBX X 

0155 

00215 

0401 

61 


LRS 

15 

0156 

00216 

0 

04 

00352 


DST 

DA DX 

0157 

00217 

-0 

02 

00335 


DLD* 

CBXX 

0158 

00220 

0 

16 

00306 


MPY 

MX 

0159 

00221 

0 

06 

00352 


DAD 

D A DX 

0160 

00222 

0 

04 

00352 


DST 

DADX 

0161 

00223 

-0 

02 

00336 


DLD* 

CBX Y 

0162 

00224 

0 

16 

00310 


MPY 

MY 

0163 

00225 

0 

06 

00352 


DAD 

DADX 

0164 

00226 

0 

04 

00352 


DST 

DADX 

0165 

00227 

-0 

02 

00337 


DLD* 

CBXZ 

0166 

00230 

0 

16 

00312 


MPY 

MZ 

0167 

00231 

0 

06 

.00352 


DAD 

DADX 

0168 

00232 

0 

04 

00352 


DST 

DADX 

0169 

00233 

“0 

02 

00340 


DLD* 

CBYX 

0170 

00234 

0 

16 

00306 


MPY 

MX 

0171 

00235 

0 

04 

00354 


DST 

DAEY 


295 



MICROCOMP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


OLD 
CRA 
IAB 
D SB 

MPY* 


0172 00216 

0173 C 0 2 3 7 

0174 00240 
C 176 00241 

0176 00242 

0177 00243 
C 1 78 00244 

0179 00245 

0180 00246 

0181 CO 24 7 

0182 00250 

0183 00251 

0184 00252 

0185 C0253 

0186 00254 

0187 00255 

0188 00256 

0189 00257 

0190 C 0 2 6 0 

0191 CO 26 1 

0192 00262 
C 193 00263 

0194 00264 

0195 00265 

0196 00266 
C 197 00267 

0198 00270 

0199 C0271 

0200 C 02 72 

0201 00273 

0202 C0274 

0203 00275 

0204 00276 
02C5 00277 
0206 00300 
C 207 00302 

0 0 303 

0208 00304 
00305 

0209 0030b 
00307 

0210 0 03 1C 
003 1 1 

0211 00312 
00313 

0212 00314 
00315 

0213 00316 
00317 

0214 00320 
00321 

0215 CO 322 
00 323 

0216 0 3 324 
00325 

0217 00326 
00327 


0 02 00 3 1 C 


140040 

000201 


0 

07 

00332 

-0 

16 

00341 

0401 

61 

0 

C6 

00354 

0 

04 

00354 

-0 

02 

00 341 

c 

16 

00 3 1C 

0 

96 

0C354 

0 

04 

C0354 

-0 

02 

90342 

0 

16 

OC 312 

c 

06 

9C354 

0 

04 

OC 3 54 

-0 

02 

00343 

0 

16 

OC 306 

0 

04 

0C156 

-0 

02 

9 C 3 4 4 

0 

16 

0C31C 

0 

06 

00356 

0 

04 

OC 3 56 

-0 

02 

OC 345 

0 

16 

003 12 

0 

C6 

OC 3 56 

0 

04 

00 3 56 


000005 
000007 
0 02 00776 
0 07 00304 
000005 
101400 
0 10 00000 
-0 01 00000 
000000 
000000 
000003 
052300 
000000 
ooooco 
000000 
000000 
ooooco 
ooocoo 
000000 
ooooco 
000000 
ooooco 
000000 
oocooo 

900000 

oocooo 

oocooo 

ooooco 

ooooco 

coooco 


LRS 

DAD 

DST 

DLD* 

MPY 

DAD 

DST 

DLD* 

MPY 

DAD 

DST 

DLD* 

MPY 

DST 

DLD* 

MPY 

DAD 

DST 

DLD* 

MPY 

DAD 

DST 

SGL 

DBL 

DLD 

DSB 

SGL 

SMI 

CALL 

JMP* 

DBPQ DBP 
TWMN DEC 
MX DBP 
MY DBP 
MZ DBP 
VPAE DBP 
VPAS DBP 
VPBE DBP 
VPBS DBP 
VPRD DBP 
TEMP DBP 


MY 


ANRD 

CBYY 

15 

DAEY 
DAE Y 
CBYY 
MY 

DAEY 

DAEY 

CBYZ 

MZ 

DAEY 

DAEY 

CBZX 

MX 

DASZ 

CBZY 

MY 

DASZ 

DASZ 

CDZZ 

MZ 

DASZ 

DASZ 


' 776 
TWMN 


DZNC 

FALN 

0 

120000DB30 

0 

c 

0 

0 

0 

0 

0 

0 

c 
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HICBOCQH P TELECOMMUNICATED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0218 

00330 

000000 

BOND OCT 

0,40000 


00331 

0400C0 



0219 

00332 

040000 

ANRD OCT 

40000,0 


00333 

000000 



0220 

00334 

000000 

ZAZT DEC 

0 

0221 

00335 

0 000000 

CBXX XAC 

FXX 

0222 

00336 

0 000000 

CBXY XAC 

FYX 

0223 

00337 

o oocooo 

CBXZ XAC 

FZX 

0224 

00340 

0 000000 

CBYX XAC 

FXY 

0225 

00341 

0 ooocoo 

CBYY XAC 

FYY 

0226 

00342 

0 oooooc 

CBYZ XAC 

FZY 

0227 

00343 

0 oocooo 

CBZX XAC 

FXZ 

0228 

00344 

0 000000 

CBZY XAC 

FYZ 

0229 

00345 

0 000000 

CBZZ XAC 

FZZ 

0230 

00346 

000000 

SDVE DBP 

0 


00347 

000000 



0231 

00350 

00000G 

SDVS DBP 

0 


00351 

000000 



0232 

00352 

000000 

DADX DBP 

0 


0035 3 

000000 



0233 

00354 

000000 

DAEY DBP 

0 


00355 

000000 



0234 

00356 

000000 

DASZ DBP 

0 


00 357 

000000 



0235 

00360 

000644 

END 



00361 

000264 




00362 

000074 





PROGRAM NAME: 

SOURCE: PEP4 
BINARY: BPEP4 

ENTRY POINTS (LOCATION): VCMP (’10730). DZNC (’11030), 

GDAC (’11123), LGDC (’11237) 

ACCESSIBLE VARIABLES (LOCATION): D1 (’11100), D2 (’11102), 

D3 (’11104), D4 (' 11106) 

GENERAL DESCRIPTION: 

This subroutine is the heart of the single position calibration 
procedure. It is divided into five parts, DZNC, GDAC, VCMP, FNAC 
and LGDC. DZNC is called by the fine alignment program once every 
second after twenty minutes or more from initialization. It filters 
WZER (the 1 sec accumulation of vertical axis drift) twice giving D1 
and D2 (note: D3 and D4 are the same as D2). After thirty minutes of 
filtering (or fifty minutes from initialization) it scales and accumulates 
D4 (same as D2) in D5. 

GDAC is culled every update in the gyro loop of the main pro- 
gram after twenty minutes or more from initialization. From twenty 
to fifty minutes it accumulates A0^ - A \cMD (vertical axis drift) in 
WZER. From fifty to eighty minutes from initialization it will also 
accumulate A6>A through A0F and at eighty minutes it calls the final 
calculation (FNAC), 

FNAC starts by inhibiting the interrupt, calling VCMP (which 
scales A£A through A0F and forms (ASA + A6>B), (A0A - A0B), (A0C +■ 
/N 0D)» (A0C -V\0D), (A0E + A0F) and (A0E - A0F) and calling LGDC (the 
lumped gyro drift calculator which performs the single position calibra- 
tions, : equations on the parameters formed by VCMP and DZNC (D5)) 
to yield A, B, C and D estimated drifts (ADFT , BDFT , CDFT and 
DDFT). FNAC then prints out these drifts in the format shown below 
and halts. Since these drifts are scaled at 2“ 4 radians and represent 
thirty minutes of accumulation they must be multiplied by -^gQQ-to get 
radians per second. T o get meru one must multiply by 

111 _= 476.16 

1800 x 7. 2921158 x 10 -8 
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mtcpdcomp telecom inn ic at fd. da^a 



odp 

-516 ASSEMBLY 

LISTING 



moi 





5 U DP 

VCMP 


p a r a 





SURR 

DZNC 


n nn 3 





5 TI R P 

LG DC 


A a n 4 





simp 

DI 


0 0 o 5 





surf 

. D2 


0^06 





shop 

D3 


02 O ' 7 





StlRR 

D4 


2 " OH 





sniin 

GP AC 


A A fiQ 





PEL 



* n i r\ 

COOP 0 

0 POOOPO 

VCM P 

DA r 

** 


° r 1 1 

n n p a 1 

000007 


DPT, 



'’ 01 ? 

POOP.? 

7 r "> 

op 0 6 u 


DLD 

on G A 


^ii 

0 0 0 P .1 

0 0 * 

or f 6 6 


DAD 

on G R 


0 0 14 

p 0 0 e 4 

0 C 4 

0 C 0 5 0 


D S T 

S * a p 


0 fi 1 ^ 

roops 

4 1 1 

7S 


T LG 

3 

MULTIPLY BY 7 ?P 

O 1 r . 

CO 00 6 

: C7 

0 p n s 0 


PSD 

SMAP 

SCALP ^0 R A D T A VS , T>7 

0 0 17 

0 0 0 r 7 

1 0 4 

OOP so 



DMAS 

on f;g a + ompgar 

0 ■•* 1 P 

0 0 0 1 ° 

? 0 2 

0 c P 1 ) 4 


DI D 

one a 


>) n 1 n 

00^11 

0 C 7 

u ~ 06 6 


DSP 

0 M G B 


o 0 7 A 

0 0 0 17 

0 P 4 

C P 0 5 6 


ns m 

DF A B 


0 071 

0001 1 

04 11 

7S 


T. L S 

3 


0O?7 

0 00 14 

0 0 7 

0 0 056 


D S n 

OF A B 


r -oo 7 

P 00 is 

0 pft 

000 5 6 


D S r 

DF A B 

OF EGA - n n 70 AB ■' 

0 0 7 4 

r 0016 

0 0 2 

A a 0 7 p 


DLD 

0**GC 


f" 0 7<S 

00017 

0 n n 

p 0 C 7 ? 


DAD 

0 M 0 D 


o '-or, 

0 0120 

0 04 

0 r 0 52 


D ST 

snen 


7 rj 7 1 

CO 02 1 

.1 4 1 1 

7 r - 


LLS 

3 


0 0 ?H 

0 00 22 

0 07 

00 052 


DSP 

sneD 


0 0 7 ° 

0 0 02 1 

0 04 

0 p 5 2 


D S ,p 

s Men 


■0 0 1 0 

0 n 0 ? 4 

0 02 

000 70 


DLD 

f) m rr 


001 1 

^0025 

n a 7 

0 r 0 ■* 2 


DS B 

omgd 


0 0 17 

C 0 0 2 0 

0 C 4 

POO 60 


DST 

dfod 


1 0 ? o 

r op 77 

Oui 1 

75 


T. I. S 

3 


nnin 

coo 10 

0 07 

PC 06 P 


DSP 

DFCD 


"■ o 7 o 

C 0 P 31 

0 0(1 

OP 0 60 


n<i *r 

DFCD 

0 meg AC - 0 * r GAP 

0 01 0 

0003 2 

0 0 2 

a r a 7 4 


DLD 

one E 


i' 037 

C 0 0 3 3 

C 06 

one 


DAD 

OMGF 


0 0 3 k 

0 0 014 

0 0 4 

00 0 54 


DST 

S M E F 


00?0 

on^is 

04 11 

7 5 


T.T.S 

3 


0 04 0 

00016 

0 0 7 

0 0 C 5 4 


DSD 

S1FP 


004 1 

0 0 0 3 7 

0 04 

POPS 4 


DST 

SMFF 

OMEGA F + QWEGAF 

0 c u 2 

000 4 C 

0 0 ? 

0 0 074 


DT.n 

OMGF, 


? 0 ft 1 

0 0 n 4 1 

0 07 

QP 076 


"SB 

OMGF 


0 04 4 

0 0 0 4 2 

0 0 4 

0 C ? 6 2 


DST 

DFFF 


204 0 

P P A /j -J 

041 1 

7S 


LLS 

3 


1 0 4 6 

rt 0 P 44 

0 07 

OPP62 


DSP 

DPFF 


7T47 

a n ,a 4 s 

0 0 4 

0 < P 62 


DST 

D^F 11, 

OMEGA F - OMFO* w 

0048 

0 00 4 6 

0 0060 

5 


SOL 



004° 

C 0 0 4 7 

-C 0 1 

OOOOO 


J MP* 

venp 


0 0 0 A 

POO so 

0 000 0 

A 

•J 

SM AO 

DDP 

r. 



00^5 1 

oocooo 





pool 

00052 

000000 

swrn 

DPP 

r 



coos .1 

0 OOP 00 





0 00 7 

OOOS4 

0 OOP no 

SMFF 

DPP 

0 



OOCSS 

OOP 00 0 





0053 

0005* 

0 OOP 00 . 

DFAB 

rnp 

0 



0 0 05 7 

OOOOO 

r. 
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MTC^OCOMP TELECOMMUNICATED DATA 
DDP-516 assembly listing 


0 c «sr* 0 006 0 


cooooo 


DFCD DBP 


000000 

000000 

DFEF 

DBP 

000000 

oooooo 

OMGA 

DBP 

000000 

oooooo 

0 MG 8 

DBP 

oooooo 

oooooo 

0 MGC 

DBP 

oooooo 

oooooo 

OMCD 

DPP 

cooooo 

oooooo 

OMGE 

DBP 

oooooo 

OOOOOO 

OMGF 

DBP 

oooooo 
o oooooo 

DZNC 

DAC 

0 0 0 0 0 7 


DBL 


0 006 1 
C OSS CO 06 2 
00063 

0056 00064 
C 0065 

0057 00066 
00067 

0 05S 00070 
0 0 0 71 
COSo 00072 
0 007 3 
0060 00074 
00075 
COM 0QT76 
00077 
006? 00100 
006? 00101 
C 064 00 1C2 

0066 00 1C 3 
C 06.6 00 104 

0067 00105 
C r 63 00106 
0069 00107 
C 070 001 10 
C 071 00111 
0072 00112 
9073 00113 
C 074 00114 
0 07S 00 116 
C 07 6 00116 
0077 C 0 1 17 
C" 7 o 00129 
C 079 00121 
0 0 9 o 

0081 0012? 
< CP? 00123 
9 p 83 00124 
0084 

0086 00126 

0086 C 0 1 26 

0087 00127 
C 0 o 8 0 0 1 3 C 
0989 00131 
0090 00132 
0 09 1 CO 133 
009? 0.0134 
0C93 00135 
9 99 4 0 01.36 
009S 00137 
CC96 00140 
0097 00141 
0 00 q CO 14 2 

0099 00143 

0100 00144 

0101 00145 

0102 00146 


0 

0 2 

00164 

n 

07 

00 150 

0401 

67 

0 

04 

00 1 62 

0401 

77 

0 

06 

00162 

0 

06 

00150 

0 

04 

00 150 

c 

07 

09 152 

0401 

67 

0 

04 

00 162 

0 40 1 

77 

0 

06 

00 162 

0 

06 

00 15? 

r\ 

04 

00152 

0 

07 

00154 

0 

06 

00 154 

o 

04 

00 154 

r\ 

u 

07 

00156 

0 

06 

00156 

0 

04 

00156 


140040 
000201 
140040 
0 04 00164 
0 02 00776 
0 07 0 G 1 6 6 
000CC5 
1 00400 
-0 01 00100 
000007 
0 02 00156 
0401 76 
0 06 00160 
0 04 00160 
000005 
-0 01 00100 


0 

0 

0 

0 

0 

c 

0 


DLD 

WZER 

DSB 

D 1 

LRS 

9 

DST 

SAVD 

i. ns 

1 

DAD 

SAVD 

DAD 

D 1 

DST 

D 1 

DSB 

D2 

LPS 

9 

DST 

SAVD 

T,RS 

1 

DAD 

SAVD 

DAD 

D2 

DST 

D2 

DSB 

D3 

LES 

9 

DAD 

D 3 

DST 

D 3 

DSB 

D4 

I, RS 

9 

DAD 

D4 

DST 

D4 

CRA 

IAB 

CRA 

DST 

W7ER 

DLD 

*776 

DSB 

FFTM 

SGL 

SPL 

JWP* 

DZNC 

DBL 

DLD 

D4 

LBS 

2 

DAD 

D5 

DST 

D5 

SGL 
J M P* 

DZNC 


KP = .01, On APPPOX 5/5 


Pi - KD(WO-DI) +D1 


D 1 -D 2 


P2 = KD (D1-P2) +02 

D2-D3 

KF = .002 OP APPROX 1/ 

D3 = KF (D2-D3) +03 

D3 - D4 


D4 = KF ( D 3 - D4 ) +D4 
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HICROCOHP TELECOM HUN I CAT ED DATA 



DDP- 

516 ASSEMBLY 

LISTING 


0103 

00150 

000000 

D1 

DBP 

0 


00151 

oooooo 




0104 

00152 

000000 

D2 

DBP 

0 


00153 

oooooo 




0105 

00154 

oooooo 

D3 

DBP 

0 


00155 

oooooo 




0106 

00156 

oooooo 

D4 

DBP 

0 


00157 

oooooo 




0107 

00160 

oooooo 

D5 

DBP 

0 


00161 

oooooo 




0108 

00162 

oooooo 

SAVD 

DBP 

0 


00163 

oooooo 




0109 

00164 

oooooo 

WZER 

DBP 

0 


00165 

oooooo 




0110 

00166 

000011 

EFT* 

DEC 

300000BB30 


00167 

011740 




0111 

00170 

000005 

THTM 

DEC 

180000BB30 


00171 

037440 




0112 

00172 

o oooooo 

DAD* 

XAC 

DADX 

0113 

00173 

0 oooooo 

GDAC 

DAC 

** 

0114 

00174 

140040 


CPA 


0115 

00175 

000201 


I AB 


0116 

00176 

0 02 004 14 


LDA 

*414 

0117 

00177 

000007 


DBL 


0118 

00200 

-0 07 00172 


DSB* 

DADX 

0119 

00201 

0 06 00164 


DAD 

WZER 

0120 

00202 

0 04 OC 164 


DST 

WZER 

0121 

00203 

0 02 00776 


DLD 

*776 

0122 

00204 

0 07 00166 


DSB 

FFTM 

0123 

00205 

000005 


SOL 


0124 

00206 

100400 


SPL 


0125 

00207 

-0 01 00173 


JHP* 

GDAC 

0126 

00210 

000007 


DBL 


0127 

00211 

0 07 00170 


DSB 

THTH 

0128 

00212 

101400 


SHI 


0129 

00213 

0 01 00246 


JHP 

FN AC 

0130 

00214 

0 02 0040C 


DLD 

* 400 

0131 

00215 

.0401 61 


LRS 

15 

0132 

00216 

0 06 00064 


DAD 

OflG A 

0133 

00217 

0 04 00064 


DST 

OHGA 

0134 

00220 

0 02 00402 


DLD 

*402 

0135 

00221 

0401 61 


LRS 

15 

0136 

00222 

0 06 00066 


DAD 

OHGB 

01 37 

00223 

0 04 00066 


DST 

OHGB 

0138 

00224 

0 02 00404 


DLD 

*404 

0139 

00225 

0401 61 


LRS 

15 

0140 

00226 

0 06 00070 


DAD 

OMGC 

0141 

00227 

0 04 0007C 


DST 

OHGC 

0142 

00230 

0 02 00406 


DLD 

*406 

0143 

00231 

0401 61 


LRS 

15 

0144 

00232 

0 06 00072 


DAD 

OHGD 

0145 

00233 

0 04 00072 


DST 

OHGD 

0146 

00234 

0 02 00410 


DLD 

*410 

0147 

00235 

0401 61 


LRS 

15 

0148 

00236 

0 06 00074 


DAD 

OHGE 

0149 

00237 

0 04 00074 


DST 

OHGE 

0150 

00240 

0 02 00412 


DLD 

*412 


30 1 



M TCPncnnp TELECOM M UN I CAT ED DATA 



DDP-5 

16 ASSEMBLY 

LISTING 


0151 

0 0?U 1 

0401 61 


IPS 

15 

1152 

0024 2 

C 06 00076 


DAD 

OMGF 

0 1 5 1 

0 0 2 4 3 

C 04 00076 


DST 

OMGF 

0 1*4 

00244 

0000 0 5 


SGL 


0.1 RR 

"0245 

-0 31 DC 17 3 


.IMP* 

GDAC 

0 1 55 

0 0246 

CC0C05 

FNAC 

SGL 


}1 r c 

00247 

00 1001 


TNH 


0 1 5 ft 

0 0 250 

0 10 ncooo 


JS’T' 

VC M P 

0 1 59 

00251 

0 10 00307 


J ST 

LGDC 

0 15 0 

C 0 252 

0 10 OOOOO 


CALL 

FPOUTC 

r 151 

00261 

0 000510 


DAC 

AD FT 

0 16 2 

00254 

0 000536 


DAC 

= 0 

0162 

C 0 255 

0 0*0535 


DAC 

= R 

r- 1 R 4 

"0256 

000000 


OCT 

0 

0 1 6 R 

0 07 57 

0 10 OOOOO 


CALL 

T10U 

■1166 

0 0 26 0 

n 000534 


DAC 

= 138 

r 1 6"f 

C 07 6 1 

0 10 C 0 " 0 " 


CALL 

RPOTJTC 

0 16 3 

00262 

0 000512 


DAC 

PD FT 

0 1 6° 

0 0 262 

0 0*0536 


DAC 

= 0 

C 170 

0926 4 

0 000535 


DAC 

= 8 

0 171 

0 02 6 5 

000000 


OC T 

C 

0 17 7 

"0266 

0 10 OOOOO 


CALL 

t i on 

0177 

00267 

0 0 0 C 5 3 4 


DAC 

= 138 

0174 

00270 

0 10 OOOOO 


TALL 

FPOUTC 

0175 

00271 

0 9"0 51 4 


DAC 

CD FT 

1176 

0C272 

0 000536 


DAC 

= 0 

0177 

00271 

0 000535 


DAC 

= 8 

0 176 

00274 

000000 


OCT 

0 

0179 

00275 

0 10 OOOOO 


CALL 

T10U 

01 RO 

00276 

0 000534 


DAC 

= 138 

9 1 0 1 

0 02 7 7 

0 10 OOOOO 


CALL 

FPOUTC 

0 1ft? 

00 7 0 0 

0 000516 


DAC 

DDFT 

0157 

C 0 7 0 1 

0 00 0 R 3 6 


DAC 

= 0 

•0 1 ft 4 

003C2 

C 000535 


DAC 

= 8 

0 1 R R 

C07C3 

000000 


OCT 

0 

0 15 6 

00 704 

0 10 OOOOO 


CALL 

T 1 0 U 

01 9T 

0 0705 

0 000534 


DAC 

= 1 3« 

"185 

0 0 706 

000000 


HLT 


018 9 



* subroutine lgdc 

0 1 9 C 

0 0 7 C 7 

0 OOOOO 0 

LG DC 

DAC 


Cl 91 

0 0 7 1 C 

COO" 07 


DBL 


0 19 ? 

007 1 1 

0 02 00054 


DID 

SMFF 

•0197 

0 0712 

0 16 00520 


MPY 

COVS 

C 194 

00313 

0 04 OC 47 4 


DST 

A 1 

•0195 

00 3 14 

C 02 OOS2C 


DLD 

COVS 

0196 

0 0 715 

0 16 00055 


MPY 

SMFF+ 1 

"197 

00 216 

0401 61 


IPS 

15 

C 19B 

00 3 17 

C 06 00474 


DAD 

A 1 

n i qo 

00320 

C 04 00474 


DST 

A 1 

02 0" 

"0321 

0 02 00054 


DLD 

SMEF 

0201 

00322 

0 16 OC 52 1 


MPY 

COVS+1 

0202 

00 3 23 

C 40 1 61 


LBS 

15 

0207 

00324 

0 06 00474 


DAD 

A 1 

0 2"4 

0 0 7 2 5 

0 04 00474 


DST 

A 1 

0295 

00326 

0 02 00050 


DLD 

SMAB 

0 2 06 

CO 327 

0 07 00474 


DSB 

A 1 

0207 

003 3 0 

0 07 OC 4 74 


DSB 

A 1 


LUMPED 


GY PO Dai! 5 '? CALCULATION 

OKEGAE +0NEGAF,P7 
BR 


C/S(OMEGAF + QMEGAF) 83 
A 1 = .5(SMAR -C/S(SMEF 
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MICROCORP TELECOMMUNICATED DATA 
DDP-516 ASSEMBLY LISTING 


0208 

00331 

0411 

66 

LLS 

10 


0209 

00332 

0 04 

00474 

DST 

A 1 

B-4 

0210 

00333 

0 02 

00056 

DLD 

DFAB 

B7 

0211 

00334 

0 16 

00522 

HPY 

cxc 


0212 

00335 

0 04 

00504 

DST 

B 1 


0213 

00336 

0 02 

00522 

DLD 

CXC 


0219 

00337 

0 16 

00057 

MPY 

DFABfl 


0215 

00340 

0401 

61 

LBS 

15 


0216 

00341 

0 06 

00504 

DAD 

B 1 


0217 

00342 

0 04 

00504 

DST 

B 1 

C**2(PFAB) 37 

0218 

00343 

0 02 

00056 

DLD 

DFAB 


0219 

00344 

0 16 

00523 

MPY 

CXC+1 


0220 

00345 

0401 

61 

LRS 

15 


0221 

00346 

0 06 

00504 

DAD 

B 1 


0222 

00347 

0 04 

00504 

DST 

B 1 


0223 

00350 

0 02 

00052 

DLD 

SM CD 

B7 

0224 

00351 

0 16 

00524 

MPY 

CXS 

C*S BO 

0225 

00352 

0 04 

00506 

DST 

B1TM 


0226 

00353 

0 02 

00524 

DLD 

CXS 


0227 

00354 

. 0 16 

00053 

MPY 

SMCD+1 


0228 

00355 

0401 

61 

LRS 

15 


0229 

00356 

0 06 

00506 

DAD 

B1TM 


0230 

00357 

0 04 

00506 

dst 

B1TM 


0231 

00360 

0 02 

00052 

DLD 

SMCD 


0232 

00361 

0 16 

00525 

MPY 

CXS+1 


0233 

00362 

0401 

61 

LRS 

15 


0234 

00 363 

0 06 

00506 

PSD 

B1TM 

C/S (SMCD) °7 

0235 

00364 

0 06 

00504 

DAD 

B 1 


0236 

00365 

0411 

66 

LLS 

10 

B 1 = , 5 (C**2 (DFAB) +C*S 

0277 

00366 

0 04 

00504 

DST 

B 1 

B-4 

02 38 

00367 

0 02 

00160 

DLD 

D5 . 

DZN 3-4 

0239 

00370 

0 16 

0C 526 . 

MPY 

SIN A 

B-4 

0240 

00371 

0 04 

00476 

DST 

A2 


0241 

00372 

0 02 

00526 

DLD 

SINA 


0242 

00373 

0 16 

00161 

MPY 

D5 + 1 


024.3 

00374 

0401 

61 

LRS 

15 


0244 

00375 

0 06 

00476 

DAD 

A2 


0245 

00376 

0 04 

00476 

DST 

A2 


0246 

.00377 

0 02 

00160 

DLD 

D5 


0247 

00400 

0 16 

00527 

MPY 

SINA+1 


0248 

00401 

0401 

61 

LRS 

15 


0249 

00402 

0 06 

00476 

DAD 

A2 

S*DZN B-4 

0250 

00403 

0 06 

00504 

DAD 

B 1 


0251 

00404 

0 04 

00476 

DST 

A2 

A2 ■= B 1 +S*D7.N B-4 

0 252 

00405 

0 06 

00474 

DAD 

A 1 ' 


0253 

00406 

0 04 

00510 ' 

DST 

A DPT 

ft DRIFT = A 1 ♦ A 2 

0254 

00407 

0 02 

00474 

DLD 

A 1 


0255 

00410 

0 07 

00476 

DSB 

A2 


0256 

00411 

0 04 

00512 

DST 

BDFT 

B DRIFT = ftl -A 2 

0257 

00412 

0 02 

00062 

DLD 

DFEF 

B7 

0258 

00413 

0 16 

00532 

MPY 

SD VC 

S/C 07 

0259 

00414 

0 04 

00500 

DST 

A3 


0260 

00415 

0 02 

00532 

DLD 

SD VC 


0261 

00416 

0 16 

00063 

MPY 

DFEFM 


0262 

00417 

0401 

61 

LRS 

15 


0263 

00420 

0 06 

00500 

DAD 

A3 


0264 

00421 

0 04 

00500 

DST 

A3 
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0 7 6 5 

00422 

1 02 

00062 


DT.D 

DFEF 



° ?6 6 

0 0 4 2 1 

0 16 

006.13 


NPY 

SDVC+ 1 



07*7 

00 4 24 

0 4 C 1 

61 


T, PS 

15 



0 7 6 fl 

00 42 5 

0 06 

00500 


DAD 

A3 

S/C{SNTJF) B7 


9? 6 * 

00426 

0 06 

00*60 


HAD 

DFCD . 

a? 


P-270 

004 27 

0411 

66 


LLS 

10 



07 71 

00 4 3 0 

0 0 4 

00600 


DST 

A3 

A3 - . 6 (DFCD 

+S/C (DFEF 

0 27? 

00431 

0 02 

00160 


DID 

D5 

P-4 


^ 2 7 ? 

0043? 

0 16 

005 30 


MPY 

COS A 

30 


0274 

9 9411 

0 04 

00506 


DST 

BIT* 



«; ? 7 5 

004 34 

0 02 

00 530 


DID 

COS A 



9 ? 7 6 

00435 

0 16 

90 161 


*PY 

D5+ 1 



0 2 77 

C 0 4 3 6 

0 40 1 

61 


IPS 

15 



0 2 7 3 

0 0417 

0 06 

00606 


DAI) 

P, 1 T N 



0 ? 7 7 

0 0440 

0 04 

00 506 


0S rr 

ni tf 



0 ? H 0 

7 0 4 4 1 

0 02 

00 160 


DID 

D5 



120 1 

0 04 4? 

0 1 6 

0*631 


*PY 

COS A+1 



■)?H 7 

0 0 44 1 

0 401 

61 


IPS 

15 



0 2 p ? 

C 0 4 4 4 

J 06 

0* 596 


DAD 

p 1 t n 



*?8 4 

0 0 4 4 5 

0 0 4 

0 0 606 


DST 

PITH 

C * D 7 *J 3-4 


02.0 5 

0 0446 

0 J? 

90 604 


DID 

B 1 

B-4 


0286 

0 04 4 7 

0 16 

90 512 


FP Y 

S D VC 

S/C DO 


■02 0 7 

0 045 0 

0 0 4 

0 0 6 9 2 


DST 

A 4 



0780 

0 0451 

0 0 ? 

00532 


OLD 

SD VC 



9 ?nn 

0045? 

0 16 

00 605 


MPY 

R 1 + 1 



9 299 

* 0 4 5 3 

0 4 0 1 

61 


IPS 

15 



*2 01 

00454 

0 0 6 

Of. 592 


DAD 

A 4 



020 ? 

00 455 

0 * 4 

0*592 


DST 

A 4 



0 ? 0 ? 

004 56 

0 0 2 

3*504 


DID 

B 1 



0?9 4 

0 0 4 5 7 

0 16 

00613 


6 P Y 

SDVC+ 1 



n? ns 

0 0460 

0 4 6 1 

61 


T. PS 

15 



0795 

0 04 61 

0 06 

0050 2 


DAD 

A 4 

S/C ( D 1 } D-u 


2 o o*7 

0 0 4 6 2 

0 07 

or 506 


DSD 

B1TN 



*298 

00463 

0 04 

00 592 


DST 

A 4 

A 4 = S/C (HI) 

-C*D 7 . N B- 

noon 

0 0 4 6 4 

0 06 

OC 500 


DAD 

A3 



men 

0 0 4 6 5 

0 04 

00514 


DST 

CDFT 

C ppTFT = 14 

B-4 

o ?r i 

C 0 466 

0 02 

0*502 


DID 

A 4 



0 102 

00 4 67 

0 0 7 

00500 


D SB 

A3 



010 ? 

0 04 7 0 

0 0 4 

0 C 5 1 6 


DST 

DDFT 

D DP IF' 7 ’ = A 4 

-A? B-4 

n?04 

00471 

000 9 C 5 


SGI 




C 7 0 5 

00472 

-0 01 

00.107 


,TRP* 

LG DC 



C 106 

00474 

*003 

00 

A 1 

DBP 

0 




0 0475 

oooc 

j*\ A 






r> ? r 7 

0 0476 

0 00 0 

00 

A2 

DBP 

0 




00477 

0000 CO 






0108 

0 0500 

oooooo 

A3 

DRP 

0 




00501 

oooooo 






0109 

0050? 

oooooo 

A 4 

DBP 

0 




00603 

0 00 0 C 0 






0? in 

00 504 

0000 

90 

B 1 

DBP 

0 




00505 

oooooo 






0311 

00506 

OOOOOO 

1 m 

DBP 

0 




C 0 5 07 

oooooo 






Oil? 

0 0610 

oooooo 

A DPT 

DBP 

0 




006 1 1 

oooooo 






0111 

00612 

cooooo 

BDFT 

DBP 

n 




00511 

oooooo. 
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PDP 
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LISTING 



0314 00514 

0003 00 

c dpt non 

0 


' CC515 

000000 




0^1^ 03516 

0 0000 3 

DDFT’ DPP 

C 


0 0 517 

ococoo 




0316 00520 

053515 

COVS DEC 

1. 51R034CBH1 

COS A /S ! K A 

0052 1 

057475 




031^ 00522 

055237 

CXC DEC 

0. 7236C6BDR3 

CODA**? 

00523 

011345 




0 3 1 R 00524 

034476 

CXS DEC 

C . 44721 35RRQ 

CO s A * S r N A 

00525 

022712 




0 310 00 r > 25 

041513 

S I N A DEC 

0. 52573 1 1 R !) 0 

STM A 

00527 

012016 




0320 005.30 

066342 

COS A DEC 

0. fi5365DRBR0 

COSTMF a 

0 n s 3 1 

0 ICO 15 




0 321 0 ^ r 1 2 

0 4 7 4 3 3 

snvc DEC 

C: . £ 1 " 1 4 0 ■> P 

sr»: a /CDS \ 

00 5 3 3 

357172 




°3?? 00524 

300212 

2ND 



C 0 5 3 5 

0 00310 




0^53*' 

0 0'~ 30 0 




0 n s 3 7 

300? 12 




r 0 5 a n 

3 30 0 1 0 




0054 1 

0 000 no 




: 0 5 4 2 

''00212 




CO 54 1 

0 000 10 




0 35 4 4 

r 0" 3 CO 




0 0 5 4 5 

0 n ^ 2 1 2 




C 0 5 4 8 

o non io 




A 0 5 4 7 

0 no 3 c 0 
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